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Cómo terminar.. 



KING'S VALLEY 2 



Las rutinas de la BIOS 



Tabla de variables ROM 



Tabla de variables RAM 



SOFTWARE: Bruce Lee > Arkanoid II, Tuareg, Strip poker II plus, Sabotaje y Bloody. 



DISFRUTA ESTAS FIESTAS JUGANDO 



CON NUESTRO SUPER PACK ESPECIAL 



ípliamos el plazo de 



pásate las fiestas más emocionantes con nuestra oferta de packs... 

EL SECRETO DE LA PIRAMIDE' 



Con los juegos más adictivos que dejarán tu 
joystick hecho migas. Por sólo 2000 pelas 
cuatro sensacionales juegos. 



STAR RUNNER 
MATAMARCIANOS 
KRYPTON 
MAD FOX 



cxoe 



SUPERCEREBROS 
I EN ACCION 

Rómpete la cabeza y 
haz que tus amigos se| 
vuelvan locos con 
nuestra oferta para 
supercocos. Por solo 
1000 pelas dos juegos 
que son la monda: 

LORD WATSON* 




PROGRAMACION A TOPE 



Los programadores harán su Agosto estas 
Navidades por solo 700 pesetejas. 

GAMES TUTOR (I) 
TEST DE LISTADOS 




Nombre y Apellidos 

Dirección 

Población CP.. 

Provincia Tlf. 

REYES DEL ARCADE ptas. 2.000 

SUPERCEREBROS EN ACCION + ptas. 1 .000 
PROGRAMACION A TOPE ptas. 700 

Gastos de envío ptas. 200 D or O ier.a 

Remito talón bancario de ptas 

Importante: Indicad en el sobre MSX-Club de cassettes 

Recorta y envía este boletín a MANHATTAN TRANSFER, S.A. 
Roca i Batí le, 10-12, bajos. 08023 Barcelona. 

adjuntando el resguardo del giro postal o un talón bancario al portador. 



Editorial 



...NUMERO 50 



¡ Ya estamos en nuestro número 50!. Aunque parezca mentira, hasta aquí hemos 
llegado. Y pensamos continuar. ¿Quién osará poner en duda nuestra vocación hacia 
el estándar MSX? ¿Acaso no somos la única revista que apoya a la norma? 
Para conmemorar este número 50 de vuestra revista se ha creado un número 
especial para contentar a todos nuestros lectores: los fanáticos del software y los 
buscadores de rutinas que les permitan perfeccionar su aprendizaje. Para los 
primeros se ha buscado un comentario especial que hiciese las delicias de todos 
ellos. Nada mejor que analizar un juego de la primera compañía encargada de 
ios pasar aquellas horas muertas de antaño delante del 
i Konami. Es más, casi nos parece recordar cuando s 
3 pasar una pantalla de Ring's Valley. Así, en este especial 
3s su segunda parte, novedad y primicia absoluta. Y 
es de MSX-Club, incluímos una reedición de las 
nuestro número ESPECIAL CODIGO MAQUINA. Dado que este número está 
agotado y ante la insistencia de los usuarios nos hemos visto casi obligados a 
publicar una segunda edición en forma de poster central. 
Para terminar el editorial, agradecemos vuestro seguimiento en estos más de cuatro 
años de MSX-Club. Esperamos os guste este ESPECIAL NUMERO 50, bodas de 
oro de nuestra/vuestra revista. 
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COMPLETA TU HEMEROTECA DE PROGRAMAS!! 




¡SI TE HACE FALTA ALGUN NUMERO DE Utti PIDELO HOY MISMO! 

Para contar con la más completa colección de programas de MSX sólo tienes que recortar o fotocopiar el cu- 
pón y dirigirlo a Dpto. Suscripciones MSX CLUB DE PROGRAMAS. Roca i Batlle, 10-12. 08023 Barcelona. 

I BOLETIN DE PEDIDO , 

Sí, deseo recibir hoy mismo los números de MSX CLUB DE PROGRAMAS, libre de 1 

I gastos de envío, por lo que adjunto talón n.° del Banco/Caja I 

| por el importe de ptas. al portador barrado. 1 

I NOMBRÉ Y APELLIDOS I 

| CALLE N ° CIUDAD i 

L DP PROVINCIA TEL J 



Sumario, 



año V - N° 50 Marzo 1989 - 2' Epoca 
Sale el día 15 de cada mes 

P.V.P. 425 Ptas. (Inc. IVA y sobretasa aérea Canarias) 



EDITORIAL 

...número 50. 



/ MONITOR AL DIA 

|J Un anticipo de las novedades que 
se están cociendo en la olla del 
MSX. 




7 OPINION 

/ El miedo de los usuarios. La cre- 
ciente angustia de aquellos usua- 
rios por la desaparición del estándar. 



CONCURSO 

La preparación de un nuevo con- 
curso de artículos periodísticos 
destinado a ocupar un espacio men- 
sual. 



I 



DEL HARD AL SOFT 

Como ya viene siendo habitual 
Willy y Carlos rivalizarán en esta 
sección por atraer vuestra curiosidad, 
intentando resolver al mismo tiempo 
las consultas de nuestros más curiosos 
lectores. ¡Comunicación y ayuda di- 
rectamente para los lectores! 
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TABLON DE 
ANUNCIOS 

Dos inserciones gratuitas para to- 
dos nuestros lectores con que podéis 
intercambiar, comprar o vender hard y 
soft original. Este mes incluímos una 
forma distinta de anunciarse en nuestra 
revista, muy económica por otra parte. 



HBRAINSTORM 
EL fascinante mundo de las cade- 
nas. ¿Sabes lo que es un "garbage 
collection"? Somos los primeros en 
hablar de esta forma de ahorrar memo- 
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BIT-BIT 

...y a jugar. Prueba lo último de 
este mes: Bruce Lee, Arkanoid II, 
Strip poker II plus, Tuareg, Sabotaje, y 
Bloody. 



1 



LISTADOS 

Razones trigonométricas 

Blue Bird, Adaptador Gen Disk 











SKING'S VALLEY 2 
Y es que cuando un cartucho cae 
en manos de algún colaborador 
loco nunca se sabe lo que va a pasar. 
¿Quieres ver concluida la segunda par- 
te de uno de los juegos más famosos de 
Konami? 




msxclub 
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PAGINAS 
CENTRALES 

Especialmente para este número 50 
incluímos un poster con una reedición 
de las partes más interesantes de nues- 
tro número ESPECIAL CODIGO 
MAQUINA: las rutinas de la BIOS, y 
las tablas de variables ROM y RAM 
del r 
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CALL XXVIII 

Cómo hacer duplicación de discos. 
La finalidad radica en hacer copias 
de seguridad de tus programas. 



1 



TRUCOS Y POKES 

Una ensalada de trucos y pokes 
para los gourmets de los videojue- 



gos. 



51 



TRUCOS DEL 
PROGRAMADOR 

Apartado abierto a la participación 
de todos los lectores. 



Director Ejecutivo: Carlos Mesa. 

Redacción: Willy Miragall, Julio Gento, Jesús Galera, Joaquín López, Julián Romero, 
Juan C. Roldán, Roni Van Ginkel. Comentarios de software: MSX-Boixos Club. 
Produce: Manhattan Transfer, S.A., Diseño y maquetación: Jordi Jaumandreu. 
Departamento de Producción y Publicidad. Directora: Birgitta Sandberg. 
Corresponsalía en Madrid: Ernesto del Valle. Suscripciones: Silvia Soler. Redacción, 
administración y publicidad: Roca i Batlle, 10-12, bajos. 08023 Barcelona, Tel. (93) 21 1 
22 56. Distribuye: SGEL, S.A. Avda. Valdelaparra, 39. Pol. Ind. Alcobendas. 28100 
Madrid. Fotomecánica y fotocomposición: JORVIC. C/Orduña, 20. Barcelona. 
Imprime: Litografía Roses. Cobalto, 7 - 9. 08004 Barcelona. 
Todo el material editado es propiedad exclusiva de MANHATTAN TRANSFER, S.A. 
Está prohibida la reproducción total o parcial por cualquier medio de esta publicación sin 
| l, correspondiente autorización. \ Dep. Leg. B-38.046-88 



5 



MERCADO DEL 
SOFTWARE 

Fuentes de última hora nos han 
informado de la inauguración 
próxima en Barcelona de un 
supermercado de software. Para sus 
comienzos han previsto una publicidad 
de venta por correo que, atraerá a los 
coleccionistas dado el alto interés de 
los títulos que se comercializarán. Para 
empezar nos hablaron de la promo- 
ción, a nivel nacional, de la publicidad 
que surgirá en nuestras revistas ofre- 
ciendo títulos de antiguos videojuegos 
a precios de risa; para hacernos una 
idea, más del 60% de descuento sobre 
el precio original. ¡Increíble!. Además 
el hacer asequible cualquier juego al 
posible usuario será la lógica de Merca- 
do del Software. Estáte atento pues a 
su próxima inauguración. 



SYSTEM 4 NOS 
TRAESUPERMAN 

Bajo licencia de DC Comics, esta 
conversión de la máquina arca- 
de, nos traslada a una difícil 
historia para salvar la humanidad. Una 
historia que se mezclará con el rescate 



de un barco donde viaja el gobernador 
y la entrometida Lois Lañe, el desman- 
telamiento de una banda terrorista, y la 
búsqueda de una bomba capaz de 
destruir al mundo -colocada, cómo no, 
por el malvado Lex Luthor-. Dotado 
de todos los poderes conocidos del 
hombre de acero, deberás hacer frente 
a un sinfín de peligros en una carrera 
contra el tiempo. Tyne soft lo llevó al 
mercado anglosajón y System 4 lo 
introducirá en nuestro país. Le augura- 
mos un gran éxito a Clark Kent. 



LANZAMIENTOS 
DEL AÑO 
PRESENTE 



Para este año 89 está prevista una 
gran serie de lanzamientos a 
nivel europeo. Rumores insis- 
tentes dictan que la conversión a 8 bits 
del programa Starglider también inclui- 
rá la versión MSX, al igual que puede 
ocurrir con los juegos de Code Masters 
-BMX Freestyle o Death Stealker-, las 
conversiones de films -Running man 
de Grand Slam-, y algunos juegos de 
Sega. Ah, y hablando de Grand Slam, 
lo más probable que ocurra es que, la 
conversión de la serie televisiva Thun- 
derbirds también se produzca a la par 
en el sistema MSX. 



NUEVO SOFTWARE OMR PARA MSX 



Nos sorprendieron recientemente 
con un programa para tráfico 
sobre la educación vial, y ahora 
se están preparando para sorprender- 
nos mucho más con varios programas 
de notable calidad. Por lo tanto, ya está 
disponible el tan esperado Sir Lancelot, 
video-aventura sobre las andanzas del 
más valeroso de los caballeros de la 
mesa redonda en busca del tan ansiado 





Grial. Castillos y bosques repletos de 
maléficos hechizos que sólo pueden 
desvaratarse reuniendo una serie de 
objetos mágicos. Y más, se está prepa- 
rando la segunda parte de Skate Dra- 
gón, un patinador con aires futuristas. 
Y para terminar una batalla galáctica, 
Space Combat: adicción ilimitada para 
los guerreros del joystick. 




INHUMANOS: 
DISCO DE ORO 

Esta noticia tiene correlación en 
parte con el software. Ya que, a 
raíz del éxito logrado por este 
grupo, todo lo que suceda a esta banda 
de fanáticos repercute en el troglodita- 
mascota del grupo musical y del soft- 
ware de Zafiro. Pues nada más y nada 
menos que esta bestia prehistórica se 
ha echado una novia con la que apare- 
cerá en público próximamente. Difícil 
ha sido hacer el amor en un Simca 
1.000, pero por lo visto no ha sido 
difícil conseguir un disco de oro por 
parte de Inhumanos. 

NUEVAS BASES 
PARA EL 
CONCURSO DE 
PROGRAMACION 

Nos hemos encontrado con gran- 
des problemas a la hora de 
recompensar a los autores de los 
distintos programas publicados en 
nuestro concurso de programación por 
falta de información. Estas circunstan- 
cias nos obligan a modificar 1) la 
carátula del cassette de envío al concur- 
so, 2) a rogar a los premiados que nos 
devuelvan el recibo que se les envíe, 
correctamente firmado y a vuelta de 
correo. Disculpando sepáis compren- 
der estas incidencias, exhortamos en el 
cumplimiento de esta nueva norma en 
el beneficio de todos. Gracias. 





¿Quién nos apoya? 
-extraído del concurso de artículos- 



...lo que parecía que consagraría al 
estándar MSX es que daba gusto ver las 
empresas que estaban apoyando el 
sistema, y no solamente empresas japo- 
nesas, sino las más grandes compañías 
del mundo estaban apoyando al están- 
dar MSX; y ésto era por algo. No era 
posible que grandes empresas como 
Sanyo, Mitsubishi, Panasonic, JVC, 
Canon, Goldstar, Toshiba, etc. se 
arriesgaran a la comercialización de un 
producto que pudiese perjudicar sus 
nombres. Y, por otra parte, era impor- 
tante el nombre de los creadores del 
Basic MSX: nada más y nada menos 
que Microsoft Corp. Un Basic potente 
y versátil con gran semejanza con el 
Basic-PC. Pero cuando verdaderamen- 
te me sorprendí y creí que el MSX 
entraba muy fuerte fue al ver un 
nombre entre las empresas pertene- 
cientes a la norma; era Amstrad. Esto 
empezaba a ser importante. 

En el mundo del software empezaba 
a destacar una empresa japonesa, la 
conocida Konami; aunque una impor- 
tante noticia se avecinaba sobre el 
mundo de los MSX. La aparición de 
los ordenadores de segunda genera- 
ción. Estos dispondrían de doble o 
triple capacidad de memoria que su 
generación anterior, y además serían 
compatibles. Los MSX2, con su capa- 
cidad gráfica y de imágenes, y con una 
capacidad de memoria media de 256k 
harían que la norma MSX no se centra- 
se sólo en producir juegos, sino pro- 
gramas más profesionales. 

Pero todo no puede ir muy bien en 
la vida: el resultado es que fueron 
pocos los importadores de MSX2 -a 
decir verdad sólo tres-, cuyos precios 
de venta al público eran elevados y con 
escaso software para estos aparatos. 

Se empezaban a escuchar las malas 
noticias sobre el MSX, principalmente 
los rumores que decían que Amstrad 
junto con Thompson se habían guarda- 
do los contratos en la caja fuerte. Pero 
éstos eran pequeños escollos que se 
podían salvar v parecía que no preocu- 
paba demasiado. En estas riendas llegó 
el Atari ST y todas las casas de 
software apuestan por las máquinas de 



16 bits. Y por si fuera poco nos 
anuncian la aparición del Spectrum 
compatible PC. Y el total error de 
todos: algunas empresas nacionales 
dejan de apoyar al MSX, dejándonos 
prácticamente en manos de dos empre- 
sas. Pero no todo tiene su lado malo. Y 
aunque lo tenemos todo en contra 
-según mi propia opinión- nosotros 
seguimos teniendo lo mejor en 8 bits. 
Quizás en un futuro las cosas cambien, 
y aunque los MSX se conviertan en 
simples consolas Megaroms -que me lo 
veo venir-, seguiremos teniendo los 
mejores programas, gracias únicamente 
a las numerosas empresas japonesas 
que se dedican a alimentar nuestras 
excelentes máquinas. 

Daniel Tomás Bosch 
(Barcelona) 

Al MSX 
¿lo matan? 



Ultimamente en nuestro país se está 
haciendo una durísima campaña en 
contra del estándar MSX. Esta ofensiva 
vino siendo realizada, principalmente, 
por una conocida revista, que a través 
de sus editoriales y artículos nos anun- 
ciaba la inminente desaparición del 
MSX -hasta la desaparición de esta 
revista hace unos meses-. Aún hay 
casos más chocantes. En cierto servicio 
técnico de una de las dos conocidas 
firmas que llevan actualmente el MSX 
me dijeron que éste era muy malo y 
que se rendiría delante de los Amiga y 
Atari ST. Para convencerme de tal cosa 
se me dieron razones tan convincentes 
como que el "el MSX sólo es compati- 
ble consigo mismo". ¡Increíble! 

Lo más curioso del caso es que en 
países como Japón, Francia, Holanda o 
Brasil, donde el MSX está implantado, 
no saben nada de ninguna crisis, mien- 
tras que aquí muchísimos usuarios 
están convencidos de que su ordenador 
está en las últimas. 

¿A qué se debe esta campaña contra 



el MSX?. ¿A que el MSX sea menos 
potente que el Amiga o el Atari?. 
Dificilmente. Hace ya muchos años 
que el Spectrum ha dejado de ser el 
mejor ordenador del mercado, y sin 
embargo, vende cada día más. ¿Porque 
se haya dejado de fabricar el estándar?. 
Falso. Los MSX se siguen fabricando. 
Es más, en Japón na aparecido el 
MSX2 Plus, que por lo que tengo 
entendido va a dejar en paños menores 
al Amiga y al Atari. Entonces.. .¿por 
qué la supuesta crisis del estándar?. 
Sencillamente por intereses comercia- 
les. Como suena. La empresa Atari ha 
decidido implantar en España sus pro- 
ductos. Hay que reconocer, entonces, 
que esta empresa tiene unos buenos 
conocimientos de marketing. 

La verdad es ésta: yo soy usuario de 
MSX2 y nunca he tenido problemas 
para conseguir software o periféricos, 
y nunca se me ha quedado pequeño mi 
MSX2. Reconozco que el Amiga es 
objetivamente más potente que el 
MSX2, pero pongo en duda la superio- 
ridad de otros ordenadores de 16 bits 
respecto al MSX2. 

El tiempo dirá la última palabra. 

Juan C. Enrique 
Burriana (Castellón) 





CONCURSO 
DE ARTICULOS 
PERIODISTICOS 



INSERTAR 
EN EL ARTICULO 
A MODO DE CUESTIONARIO 

TITULO DEL ARTICULO 



TEMATICA 

AUTOR (NOMBRE Y 
DOS APELLIDOS) ... 



D.N.I 

CALLE 

N° POBLACION 

PROVINCIA 

BREVE RESUMEN 



EDAD. 
. . . . D P '. 



TEL N" DE RECEPCION. 



Remitir a: 

CONCURSO DE ARTICULOS PERIODISTICOS 
Roca i BatUe, 10-12, bajos. 08023 Barcelona 



BASES 

1 . El tema con el que irá relacionado 
el artículo deberá tratar sobre la 
informática. El contenido es libre, 
sin embargo, deberá ir relaciona- 
do, específicamente, con el están- 
dar MSX. 

2. Podrán participar todos nuestros 
lectores, cualquiera que sea su 
edad. 

3. Todos los artículos deberán llevar 
el cuestionario adjunto, o bien 
fotocopia del mismo. 

4. Los artículos se escribirán meca- 
nografiados, a doble espacio, y con 
una extensión mínima de cuatro 
folios. 

5. Los artículos tendrán que ser origi- 
nales y no podrán haber aparecido 
publicados en cualquier medio de 
información. 

6. No existe fecha límite para el plazo 
de entrega de originales. 

7. Manhattan Transfer hará una se- 
lección previa de todos los artícu- 
los a publicar en cada número de la 
revista. 

PREMIOS 

8. En fecha a determinar, los lectores 
de la revista podrán votar al que 
consideren el mejor artículo del 
año. Las votaciones entrarán en un 
sorteo de diversos premios. 

9. Manhattan Transfer premiará en 
metálico al artículo ganador del 
concurso -el más votado por los 
lectores. 

FALLO Y 
JURADO 

10. El consejo asesor de la editorial 
Manhattan Transfer hará una se- 
lección previa de los artículos a 
publicar, mientras que el artículo 
ganador queda en función de los 
votos de los lectores. Ambos fallos 
serán inapelables. 

11. Todo el material quedará en pro- 
piedad de Manhattan Transfer, 
S.A. 

12. No se mantendrá correspondencia 
ni se devolverán originales. 




CONCURSO DE PROGRAMAS 



msxclub 



BASES 

1. Podrán participar todos nuestros 
lectores, cualquiera que sea su 
edad. 

2. Los programas podrán ser envia- 
dos en cinta de cassette, debida- 
mente protegidos en su estuche de 
plástico, o en disco de 3 1/2 
pulgadas. 

3. Todos los programas deberán lle- 
var la carátula adjunta, o bien 
fotocopia de la misma. 

4. Cada lector puede enviar tantos 
programas como desee. 

5. No se aceptarán programas va 
publicados en otros medios o pla- 
giados. 

6. Los programas deben seguir las 
normas usuales de programación 
estructurada, utilizando líneas 
REM para marcar todas sus partes 
-en la primera línea REM hay aue 
indicar vuestro nombre y apelli- 
dos, aparte de especificar que el 
programa sea para MSX-Club-, 
subrutinas donde sean necesarias, 
etc. 

7. Todos los programas deben incluir 
las correspondientes instrucciones, 
lista de las variables utilizadas, 
aplicaciones posibles del progra- 
ma, explicación del mismo, y to- 
dos aquellos comentarios y anota- 
ciones que el autor considere pue- 
dan ser de interés para su publica- 
ción. 

PREMIOS 

8. Los programas serán premiados 
mensualmente, de modo acorde 
con su calidad, con un premio en 
metálico de 2.000 a 15.000 ptas. 

FALLO Y JURADO 

9. El Departamento de Programación 



de MSX-Club de Programas hará 
la selección de aquellos programas 
de entre los recibidos, según su 
calidad y su estructuración. 
10. Los programas seleccionados apa- 
recerán publicados en la revista 
MSX-Club de Programas. 



de PROGRAMAS 



11. Las decisiones del jurado serán 
inapelables. 

12. Los programas no se devolverán, 
salvo en ocasiones excepcionales. 

13. El plazo de entrega de los progra- 
mas finalizará el día 31 de diciem- 
bre de 1989. 





Remitir de PROGRAMAS! \H PROGRAMA 

Roca i Batlle, 10-12, bajos 08023 Barcelona 
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DEL HARD . . 



¿Cómo puedo hacer salir datos 
fuera del margen de la pantalla? 

Ignasi Hernardo 
Barcelona 

No es posible hacer lo que pides. 
Lo único que podrás conseguir es 
variar el color de los márgenes de la 
pantalla. Si lo haces a suficiente 
velocidad conseguirás el efecto de 
barras horizontales que aparece du- 
rante la carga de muchos juegos 
comerciales. 

¿Es posible programar en COBOL 
con el SVI-738? 

Jesús Díaz 
Madrid 

Si es posible programar en este 
lenguaje con los ordenadores MSX. 
Para ello únicamente precisas conse- 
guir el compilador de este lenguaje y 
un editor de textos. Respecto al 
compilador, existía uno distribuido 
por Sony, pese a que no sabemos si 
en la actualidad seguirá disponiendo 
del mismo en stock. 

¿Se estropean los chips de memoria 
al hacer RESET? ¿Exactamente qué 
zona es borrada por el RESET? 
Antonio González Carca villa 
Salamanca 

En absoluto se estropean los chips 
de memoria por el uso del botón de 
RESET. Hay dos tipos de RESET 
en los ordenadores MSX. El primero 
no es tal, y simplemente es un 
pulsador que interrumpe la alimen- 
tación de corriente a la árcuiteria 
del MSX. Este se encuentra, por 
ejemplo, en el conectar de cartucho 
de los ordenadores SVI-728. La 
pulsación repetida de este RESET 
puede producir picos de tensión que, 
a la larga, deterioran la árcuiteria 
del ordenador. Existe, sin embargo, 
otro reset mucho más adecuado. Se 
trata de un pulsador conectado a la 
patÜla RESET del Z-80. Este RE- 
SET simplemente reinicializa el 2- 
80, por lo que no se borra la 
memoria del ordenador. Simple- 
mente se perderá la zona de memo- 
ria en que el BASIC almacena sus 
propias variables, que serán iniciali- 
zadas por el intérprete. Por esta 
razón los programas en BASIC apa- 
rentemente se habrán borrado, aun- 
que en realidad permanecen todavía 
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¿Sirve RR o RR (HL) para dar la 
vuelta a un sprite? 

Alejandro Marín Niebla 
Sevilla 

Otra vez tú... Sí, gracias a estas 
instrucciones de ensamblador Z-80 
podrás dar la vuelta a la figura que 
define un sprite. Entendemos por 
dar la vuelta, claro está, a pasar los 
puntos de la parte izquierda del 
sprite a la parte derecha y viceversa. 
Para ello deberás seguir el siguiente 
proceso que esbozamos en pseudo- 
BASIC para que la idea sea más 
clara 

10 FOR I=0TO7' Bytes del sprite 

20 FOR J=0TO7' Bits en el byte 

30 RRC (HL + I) 

40 RL (DE+I) 

50 If carry OR (DE+I), 128 

60 NEXTj 

70 NEXT I 

La línea 30 desplaza a la derecha 
el byte que estamos tratando y 
coloca en el flag de acarreo (CF) el 
bit que sale. Ahora sabemos cuál era 
el bit más a la derecha de esta fila 
del sprite. Lo que haremos es despla- 
zar a la izquierda el resultado y 
añadirle por este lado un 1 si éste es 
el valor del carry. Creo que con este 
ligero guión te será bastante fácil 
diseñar el programa en ensamblador 
que realice la rotación del sprite. 
Adelante... 



¿Dónde puedo adqui 
ma PASCAL en caí 



Deseo utilizar mi MSX a un nivel de 
programación que incluya lenguajes 
como PASCAL, LOGO, BASIC, 
etc. ¿Creéis que es conveniente el 
de una unidad de diskette? 

^uirir un progra- 
cartucho? 

C. Peris 
Sagunto 

Pese a que no es imprescindible, si 
deseas utilizar lenguajes como PAS- 
CAL, o realizar aplicaciones de 
gestión en BASIC es bastante acon- 
sejable que utilices una unidad de 
disco. En primer lugar no tendrás 
que tener los programas, y los len- 
guajes al mismo tiempo en memoria, 
lo que te permitirá realizar progra- 
mas mucho más amplios; pero ade- 
más obtendrás una velocidad mucho 
más interesante que si utilizas com- 
piladores en memoria. Por último, 
los compiladores que existen sobre 
disco, sobre todo de PASCAL, son 
mucho mejores que el Hisoft Pascal 
para cinta. 

Respecto al compilador PASCAL 
en cartucho, no conocemos ninguno; 
pero existe uno bastante aceptable 
distribuido por Sony en formato 
disco. Si te decides por la unidad, ya 



lo sabes. 



¿Se adapta el juego SKYHAWK al 
sistema MSX-2? 

Rafael L. Rubio Cabanes 
Valencia 

Lamentamos tener que informar- 
te de que el juego SKYHAWK no 
funciona en los MSX de segunda 
generación debido a que utiliza 
unas rutinas especiales en código 
máquina para la generación de Tos 
gráficos. Estas rutinas no son com- 
patibles con los MSX-2. 



¿Está vuestro BBS en Barcelona?, 
ya que esto representa un problema 
para usuarios de Sevilla como yo. 
Lo digo por el dinero de la llamada. 

Alejandro Marín Niebla 
Sevilla 

Efectivamente nuestro BBS está 
en Barcelona; pero esto no debe 
asustarte. La transmisión de la 
mayoría de los programas dura tan 
sólo unos pocos segundos (general- 
mente nunca supera uno o dos 
minutos) por lo que, si "no te 
duermes", podrás conseguir intere- 
santes programas a un precio bas- 
tante bajo. No lo dudes, conecta con 
nosotros aunque, eso sí, no olvides 
poner un reloj al lado del teclado del 
ordenador... 
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Me gustaría pedirles un 
favor que es el siguiente: me 
gustaría informarme acerca 
del juego Maze of Galious. 
Por ese motivo, ¿podrían 
Vds. decirme en qué ejem- 
plar de esta revista se habla 
de este juego? 

Javier Cenzano 
(Madrid) 

Te debes haber incorpora- 
do en recientes fechas a 
nuestra revista, ya que un 
resumen de trucos y claves 
de acceso a los distintos 
mundos de este juego apare- 
ció en un número reciente d 
MSX-Club, concretamente 
número 46 correspon- 
diente al mes de noviembre 
del año pasado. Si este ejem- 
plar no lo tienes puedes uti- 



¿Cómo podría localizar di- 
recciones sobre distribuido- 
res de programas para MSX 
en Inglaterra? 

Andrés Arjona Vicente 
(Teruel) 

Como muchos usuarios 
ya sabrán el mercado anglo- 
sajón está cubierto por unas 
determinadas firmas de 
hardware, donde ha sido 
prácticamente imposible la 
introducción del estándar ja- 
ponés -cosa que no ha de 
extrañar mucho debido a 
que los ingleses son muy 



suyos-. Por tanto aún a pe- 
sar nuestro los escasos dis- 
tribuidores de software de 
este país están muy disper- 
sos, siendo una pequeña mi- 
noría. Lo que sí te puedo 
aconsejar es que te pongas 
en contacto con el, quizás, 
mayor grupo de usuarios 
MSX del Reino Unido. Este 
grupo compuesto por unas 
1.000 personas inclusive edi- 
tan un pequeño fanzine al 
más puro estilo de noticias y 
programas. Por otra parte, 
siendo un grupo de usuarios, 
estarán encantados de res- 



si quieres mantener corres- 
pondencia o ponerte en con- 
tacto mediante el teléfono, 
aquí te facilito las dos cosas: 
Tel. 0775-711188 & 3433 
MBX MAILBOX ON 
051 - 531 - 6464 MBX NO 
030017 



Tengo problemas de carga 
con unos juegos que no co- 
rren en mi MSX2. Todos 
estos juegos cuando cargan 
se quedan en la carátula de 
presentación y se detiene el 
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ponderte acerca de las distri- 
buidoras del país. David 
Webb es el responsable de 
esta multinacional que, en 
línea directa con él, conver- 
samos sobre el asunto de la 
traducción al inglés de nues- 
tra revista. Aunque me pare- 
ce que va a ser imposible. 

La dirección es la siguien- 
te: 

LINK, H.Q. 

1 1, Ayscough Ave, 

Spalding, 

Lines. 

PE 11 2QB 
UNITED KINGDOM 
La dirección anterior es la 
central de MSX LINK, pero 



cassette, pero sin ejecutarlo. 
Quisiera que Vds. me pudie- 
ran decir si hay alguna ins- 
trucción o poke para que 
dichos juegos funcionen. 

Miguel Angel López 
(Madrid) 

Son muchas las cartas que 
se van recibiendo a diario 
preguntando por uno de los 
maravillosos pokes compati- 
bles para su ordenador. Ca- 
da uno es consciente que, 
dependiendo del modelo y 
marca que posea, debido a 
sus diversas configuraciones 
es necesario la introducción 
de un poke u otro a la hora 



... .AJL. SOFT 



de ejecutar los programas 
comerciales en cassete. Sin 
embargo para no hacer una 
lista innecesaria de todos los 
pokes conocidos, te incluyo 
un pequeño truco que te 
indicará el poke a poner en 
la dirección &HFFFF de tu 
MSX2 para evitar los pro- 
blemas de carga. 
10 B=PEEK (-1) XOR 
255: PRINT "MI POKE 
MARAVILLOSO ES"; B/ 
16 OR B AND 240. 

En anteriores números se 
han incluido más trucos de 
compatibilidad. Te reco- 
miendo su lectura. 

Hace poco me compré el 
cartucho Usas de Konami y 
en el número 45 de esta 
revista enviaron unos trucos 
para éste. Me gustaría que 
me revelaran algunos trucos 
más para acceder a las con- 
traseñas del mismo, así co- 
mo éstas. 

Carlos García López 
Reus (Tarragona) 

Aquí tienes las cuatro 
contraseñas del mismo que 
te permitirán acceder direc- 
tamente a cualquiera de los 
niveles del juego. Para intro- 
ducir estas contraseñas ten 
en cuenta que has de pulsar 
la tecla CTRL en el momen- 
to en que aparezca el logoti- 
po de Konami. 

1. JUBA RUINS 

2. HARAPPA RUINS 

3. GANDHARA RUINS 

4. MOHENJO DARO 



Tablón de anuncios 



Esta sección de MSX-Club es de nuestros lectores. Todos ellos tienen derecho a dos inserciones 
normales y sin clasificar totalmente gratuitas. Las características de estos no permiten la inclusión 
de los mismos con fines de lucro. 

A partir de este número todos aquellos anuncios que quieran ser clasificados como módulos sólo 
tendrán que indicarlo en el sobre atendiendo a las siguientes características: 1. Un módulo es un 
pequeño anuncio destacado en negativo o con un marco que se atenga a las medidas de la columna; 
2. El módulo puede incorporar distintos tipos y tamaños de letra a seleccionar por el anunciante; 3. 
£1 anunciante puede añadir un anagrama o logotipo a su anuncio; 4. Es posible la inclusión de 
pequeños dibujos o ilustraciones para acompañar al texto. 

Esta forma de anunciarse es especialmente recomendable para Clubs de MSX, ventas, etc. 
Pretendemos promocionar a los usuarios de nuestro país a través de anuncios económicos. 

Para insertar un módulo deberás enviar el texto a publicar, junto con las características que tú 
creas más convenientes -logotipo, forma, ilustración- adjuntando en un sobre talón nominativo al 
portador barrado por un importe de 1.000 ptas. para una sola inserción. 

Para que os hagáis cargo de esta nueva modalidad en el apartado de nuestro habitual TABLON 
incluímos un ejemplo. 



VENDO ordenador Sharp MZ 721 
lectograbadora incorporada. Precio 
a convenir. O cambio por impreso- 
ra Sony PRN MI 20. También ven- 
do impresora Philips VW 0020. 
Precio a convenir (96) 367 91 84. 
José Vicente. Sólo noches. CP1. 
•NOS INTERESARIA contactar 



CLUB ASTUR MSX 

Si eres un adicto 
del MSX. 
Si quieres estar 
siempre al día. 
Si quieres ser el 
mejor programador 
Si quieres tener la 
mayor colección de 
programas. 
Si quieres 
intercambiar con 
gente de toda 
España. 
O si, 

simplemente, deseas 
formar parte de un 
buen club... 
Escríbenos al Apdo. 
de correos 1.277. 
33080 Oviedo. ° 
Asturias. 



con usuarios de MSX que dispon- 
gan de compiladores (Pascal, C, 
Cobo!, Logo, Fortrán, etc.) en dis- 
co o cassette. Interesados llamar a 
Rafael (93) 870 40 26 ó Jordi (93) 
870 31 68. CP1. 

CAMBIO once primeros títulos en 
cinta (Aspar, Quijote, Martín, 
Phantis, Hardest, etc.) por Nemesis 
2 o Salamander o bien por otro 
título posterior de Konami para 
MSX de primera generación. Tam- 
bién cambio cartucho de ajedrez 
-Chess- de Sony + 5 cintas, por 
cartucho de Konami. Sólo origina- 
les. Rafael Hurtado, San Ignacio, 
24. 41540 Puebla de Cazalla. Sevilla. 
CP1. 

VENDO Yamaha MSX modelo 
CX5M con sintetizador SFG-05 
incorporado. Ideal para ediciones 
musicales. Con 5 cartuchos secuen- 
ciadores y de edición de sonidos. 
40.000 ptas. Carlos Tosas (93) 230 
39 44. CP1. 

VENDO MSX2 Mitsubishi ML- 
G3 192 Kb con unidad de discos 3 
1/2", ratón, joystick, utilidades y 
lenguajes en discos y cartuchos. 
Muchas revistas, libros y manuales. 
Todo 50.000. Llamar tardes al (91) 
738 50 92. Preguntar por Arturo. 
CP1. 

COMPRO teclado para Music mo- 
dule, interface DMS para MSX y 
otros periféricos musicales para 
MSX. También busco una impreso- 
ra buena, bonita y barata. Segundo 
Rodero Rubio. (91) 773 63 70. CPl. 
VENDO ordenador Sony MSX2 
F700S e impresora 120 PRN Hit 
Bit, una caja de papel de impresora, 
el programa Hybrid y todos los 
manuales con el ordenador. Todo 
junto y en buen estado 105.000 
ptas. (93) 309 30 23. Preguntar por 
Alejandro. CPl. 

• SOY un usuario de MSX2 y tengo 
especial interés por conseguir 
-comprar o cambiar- programas de 
aplicación; sobre todo programas 
para usar con impresora -procesa- 
dor de textos, diseñador gráfico, 

' gráficos de gestión, bases de datos, 



etc.- Pero tengo entendido que los 
programas Philips no funcionan 
más que con impresoras Philips, y 
la mia es una Panasonic. Por lo 
tanto desearía que fueran progra- 
mas de otras compañías o firmas. 
Antonio Jesús Márquez. (96) 545 76 
14. CPl. 

VENDO ordenador VG8020 -Phi- 
lips- en buen estado, manual de 
instrucciones, un cartucho y 
Quickshot II nuevo. O lo cambiaría 
por un Spectrum a concretar. Lo- 
groño (La Rioja). 23 81 52. Miguel: 
CPl. 

CAMBIO el cartucho MegaRom 
"Maze of Galious", con sus instruc- 
ciones, por el cartucho "Creative 
Greetings". Interesados escribir a 
Víctor M. Moreno. Larga, 44, Pto. 
Santa María. 11500 Cádiz. CPl. 
VENDO impresora Sony PRN 
M09 en perfecto estado, regalaría 
con ella curso de Basic MSX en 
vídeo y muchos programas. Precio 
a convenir. Miguel. (91) 279 67 97. 
CPl. 

COMPRO o cambio por juegos el 
Especial Código máquina de MSX 
Extra. Rafa. 210 72 36. Sólo Barce- 
lona ciudad. CPl. 
SUPER OFERTA vendo ordena- 
dor Sony MSX2 modelo HB F700S 
con 256K RAM y 128K VRM. 
Incluyo en el precio un ratón, 
manuales en español, cable cassette, 
cartucho Turbo 5000... Precio a 
convenir. Llamar de lunes a viernes 
de 22 a 23 horas. Preguntar por 
Javier. (93) 386 62 86. Santa Coloma 
de Gramanet. Barcelona. CPl. 
VENDO ordenador Sony HB F9S, 
cassette especial SDC 600, cuatro 
joysticks, TV b/n de 14" y los 
cartuchos F-l Spirit y Penguin Ad- 
venture. Por 60.000 ptas. Incluyo 
conexiones, instrucciones en caste- 
llano y revistas. Llamar de 4 a 9 (93) 
381 27 74. CPl. 

VENDO ordenador Amstrad PC- 
1512, monitor color, dos unidades 
disco. Sin desembalar. Impresora 
Amstrad DMP-3000. También ma- 
nuales castellano. Libros informáti- 



ca, 70 revistas MSX, 20 revistas 
PC-PCW-CPC. Listado de 210 
programas MSX. Tambin lo cambio 

B>r otras cosas que me interesen, 
eseo conseguir interface y cable 
conectar PCW 8256 y PC 1512. 
Apartado 274. Talavera de la Reina. 
45600 Toledo. CPl. 
COMPRO programa de gráficos 
Miller Grafic. Precio a convenir. A 
ser posible de mi ciudad. Preguntar 
por Marc Vallribera de 6 a 10 horas. 
(93) 725 38 73. CPl. 
VENDO monitor fósforo verde 
Philips en buen estado por 14.000 

Etas. Tiene sonido y cables. Tam- 
ién cambio Phantis, Heist, Despe- 
rado y Avenger por cartucho Ne- 
mesis I ó II o Maze of Galious. 
(939) 310 78 74. Luis. CPl. 
VENDO ordenador Philips NMS 
8250 MSX2, 128 K RAM, 128K 
VRAM, con ratón, revistas, libros, 
joystick de fabricación propia, cas- 
sette Philips, cables y embalajes. 
Impecable. Precio a convenir. Da- 



De 15 a 20 horas. (954) 63 53 
07. CPl. 

VENDO un lote de cartuchos 
MSX2. ¡Originales! Deep Forest, 
Super Tritorn, Garyuo king, 
Scramble Formation. Todo por 
12.000 ptas. Llamar a Salvador. (96) 
287 24 86. CPl. 

VENDO ordenador Sony HB-75P 
64K por cambio al MSX2, con 
manuales de instrucciones, cables, 
etc. Por 35.000 ptas. Interesados 
llamar a Jesús Juan Anchel. (96) 357 
57 42. CPl. 

VENDO ordenador Sony HB- 
501 P. Regalo cartuchos Nemesis 2 
y Fl Spint y un joystick profesio- 
nal. Todo junto o por separado. 
Llamar los fines de semana al (951) 
11 01 83. Juan Francisco Márquez 
Ruiz. CPl. 

"VENDO ordenador Yamaha CX 
5MII/128, Music Computer, len- 
guaje MSX2, FMVoices, stéreo, 
unidad de discos, 4 cartridges, base 
de datos, ficheros, programas, Mu- 
sic Composer, Music Macro, MIDI 
record, FM arranger, mouse, joys- 
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tick, órgano musical con salida MI- 
DI e instrucciones. (973) 23 25 79. 
Llamar en horas de comida y pre- 
guntar por Siseo. CP1. 
VENDO Philips 8020, cassette, 
joystick, cables y manuales, y 500 
programas. Todo ello por 100.000 
ptas. negociables. José Martín Ca- 
margo. (93) 386 19 20. Llamar sólo 
sábados tarde. CP2. 
ATENCION si vas a comprarte un 
joystick, consúltame primero. Para 
más información llama al (964) 23 
06 65. Luis. CP2. 
VENDO ordenador SVI XPress 
con 80 k Ram, unidad de disco 
incorporada 3 1/5". Incluye sistema 
operativo CP/M y MSX-DOS por 
45.000 ptas. + unidad de discos 
Sony HBD-50 por 35.000 + pro- 
gramas de aplicación como DBase 
II, T/maker IV, Eeos entorno gráfi- 
co MSX2, BDS-C, Eddy II, Mué, 
Pasocalc, Print lab. Word star, Tur- 
bo Pascal, Fortran, Multiplan. (91) 
645 83 61. Francisco. CP2. 
COMPRARIA los cartuchos de 
Konami íTrack & field I y II). 
Llamar al (93) 246 55 52. Juan 
Faura. CP2. 

CAMBIO dos cartuchos Sony (Su- 
per soccer y Lode runner), y los 
juegos Beamrider, Decathlon y 
Brian Jacks superstar por un cartu- 
cho de ampliación de memoria de 
64k. Llamar al (94) 432 77 55. 
Preguntar por Iñaki. CP2. 
VENDO ordenador MSX2 Philips 
NMS 8280 con digitalizador de 
imágenes, sobreimposición y mez- 
cla de vídeo, dos drives, RGB, 
entradas y salidas de audio (estéreo) 
y vídeo. Manuales y diskettes origi- 
nales. 110.000 negociables. Rafaelal 
(954) 45 97 15. CP2. 
VENDO ordenador Spectrum +2 
en buen estado con manual y trans- 
formador. Llamar al (93) 240 60 69 
por las urdes. Preguntar por Magí. 
CP2. 

COMPRO o cambio algunos de los 
juegos que poseo por programa de 
diseño que permita obtener dibujos 
por la plotter. También compro o 
cambio un ratón (que esté en buen 
estado de uso). Interesados llamar al 
495 18 23 de Vizcaya. Preguntar por 
Asier. CP2. 

VENDO ordenador Philips NMS- 
8280 (digitaliza y superpone imáge- 
nes, dos unidades de disco de 720k 
y 256k de RAM), monitor en color 
Philips CM-8501, euroconector pa- 
ra vídeo, varios juegos MSX2, dis- 
cos originales Videografics y rióme 
office, sistema operativo MSX- 
DOS, y muchas revistas por 
140.000 ptas. (Seminuevo, compra- 
do en noviembre de 1987). (93) 305 
44 89. José Antonio Rodríguez 
Barbarrosa. CP2. 

VENDO vídeojuego Radiola con 
tres cartuchos de juegos y dos 
joysticks, o lo cambio por los cartu- 
chos Salamander, Game Master, y 
Penguin adven ture. Juan Turulí. 
(93) 232 65 73.CP2. 
VENDO 60 juegos originales a 400 
ptas. cada uno, y el Pack Erbe 88 
por 1.000 ptas. Preguntar por Juan 
en el (922) 72 03 16.CP2. 
VENDO ordenador Amstrad PC- 
1512, monitor en color, dos unida- 
des de disco. Sin desembalar. Rega- 
lo 250 discos, manuales,, etc. Impre- 



sora Amstrad DMP-3000. También 
ordenador PCW-8256 con monitor 
e impresora. Dos manuales en cas- 
tellano. Libros informática, 70 re- 
vistas MSX, 20 revistas PC-PCW- 
CPC. Listado de 210 programas 
MSX. También lo cambio por otras 
cosas que me interesen. Deseo con- 
seguir interface y cable conector 
PCW-8256 y PC-1512. Apañado 
274. Talavera de la Reina, 45600 
Toledo. CP2. 

VENDO ordenador Sony HB-F9S 
MSX2 cassette Sonv SDC-600S, 
con doble velocidad de carga y 
selector de fase para evitar proble- 
mas de carga, un joystick, muchos 
juegos en cinta originales, y muchas 
revistas del sistema MSX. Todo el 
lote por 65.000 ptas. (93) 691 77 68. 
CP2. 

VENDO libro de código máquina 
para usuarios de SVI 318/328. In- 
cluye ensamblador en código má- 
quina en cassette. El libro contiene 
las variables del sistema, rutinas de 
la ROM, etc. Vendo también SVI- 
328 con cassette, joystick e infini- 
dad de programas. También el libro 
anterior. Llamar al (91) 230 99 19. 
CP2. 

VENDO por tenerlo repetido car- 
tucho Salamander de Konami, sin 
estrenar, por 4.000 ptas. Francisco 
Montiel. Málaga. CP2. 
VENDO unidad de disco Sony 
HBD-50 de 3,5", con controlador. 
Regalo MSX-DOS, DOSHLP y 
juegos en disco. También regalo 
Nemesis en cartucho. Todo por 
30.000 ptas. Llamar al (948) 85 14 
57 y deja tu dirección o teléfono. 
Oscar. CP2. 

VENDO SVI-728, pantalla, joys- 
tick, cassette, cables, manuales, dos 
libros (Programas comentados de 
Basic básico y guía del programa- 
dor, Manual de referencia MSX), 
cuatro cartuchos y 35 revistas de 
MSX. Todo en perfecto estado. 
50.000 negociables. Juan Manuel. 
(93) 716 04 17. CP2. 
VENDO cartucho Multimiller y 
ampliación de memoria 64k, ambos 
por 9.500 ptas. Francisco Balbin, 
Carretera del Perú. Edificio Pizarro 
P-3, !• K 04006 Almería. CP2. 
» HEY Firesoft te ofrece algo exóti- 
co. Opiniones, consultas, tokes, po- 
kes, críticas, artículos. Información 
sobre software del MSX y MSX2. 
Todo ello gratis. Infórmate. Escribe 
a Firesoft. Sant Jordi, 33. 43201 
Reus (Tarragona). CP2. 
VENDO ordenador Spectravídeo 
728 con un floppy Sony HBD-50, 
monitor Philips 80 e impresora 
matricial Philips VW020 de 80 co- 
lumnas (caracteres y gráficos). To- 
do el equipo dispone de los interfa- 
ces necesarios y de los manuales y 
embalajes originales. Prácticamente 
nuevo. Precio 100.000 ptas. Llamar 
noches (93) 410 72 32. Fernando 
Aguilera. CP2. 

VENDO ordenador MSX Toshiba 
de 64k, casi nuevo, en perfecto 
estado, con todos los cables. Ade- 
más tres cassettes: demostración, 
ajedrez-Chessmate, y Breakout. 
Precio 25.000 ptas. R. Fernández. 
(96) 361 27 12. CP2. 



Especial para nuevos 
usuarios. 

Para que ningún lector 
quede al margen te propo- 
nemos una nueva sección/ 
concurso. 

¡Participa con tu pe- 

BASES 

1. " Podrán participar to- 

dos nuestros lectores, 
cualquiera que sea su 
edad. 

2. " Los programas se re- 

mitirán grabados en 
cassettes debidamente 
protegidas dentro de 
su estuche plástico. 

3. " No se admitirán aque- 

llos programas plagia- 
dos o editados por 
otras publicaciones. 

4. " Las mejoras a los pro- 

gramas se considerarán 
una aportación al mis- 
mo y se publicarán en la 
sección Línea Directa. 

PREMIOS 

5. ° MSX CLUB premiará 

aquellos programas 
publicados con 2.000 
pts. 

6. " MSX CLUB se reserva 

el derecho de abonar 
los premios en metáli- 
co o su equivalente en 
software, haciéndolos 
efectivos a los 15 días 
de publicados. 

FALLO Y 
JURADO 

7. ° El Departamento de 

Programación actuará 
como jurado y su fallo 
será inapelable. 

8. ° Los programas remi- 

tidos no se devolve- 
rán, siendo destruidos 
aquellos que no sean 
seleccionados. 



BRAINSTORM , 



.por Willy Miragall, 



COMO AHORRAR 
MEMORIA 



El BASIC es uno de los 
lenguajes que permiten tra- 
bajar más fácilmente con las 
cadenas de caracteres. Len- 
guajes como PASCAL o inclu- 
so C quedan muy por detrás de 
este importante aspecto de la 
programación. 



<QUE ES UN STRING? 

Como ya viene siendo habitual, 
iniciaremos esta sección con una 
definición rápida de lo que es un 
string. Un string, cadena de caracteres, 
cadena alfanumérica -y otos muchos 
nombres que puede tomar- no es más 
que una serie de caracteres con una 
longitud determinada. Así, "A" es una 
cadena de longitud 1 mientras que 
"HOLA" es una de longitud 4. 

jPues vaya chorrada! -dirán algu- 
nos-. Pese a que parece bastante estú- 
pido, el aspecto comentado tiene una 
gran importancia. Precisamente la ca- 
pacidad de que los strings tengan una 
longitud predeterminada es lo que hace 
que otros muchos lenguajes limiten su 
uso todo lo posible. 



GESTION DINAMICA DE MEMORIA 

Pero, ¿qué problema tiene que los 
strings tengan longitud variable? La 
respuesta es muy sencilla, su almacena- 
miento en memoria. Estamos pidiendo 
al intérprete de BASIC que almacene 
en su memoria algo que puede reducir- 
se a aumentar de tamaño de forma 
totalmente impredecible. 
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Veamos el problema con el siguiente 
programa: 

10 A$="HOLA" 
20 B$="PEPE" 

30 A$=A$+STRING$(50, "A") 

Las ilustraciones 1 y 2 representan 
dos posibles soluciones a adoptar por 
el intérprete de BASIC para almacenar 
los strings. Veamos lo que ocurre. La 
línea 10, en ambos casos, provoca 
idénticos resultados, se almacena 
"HOLA" al principio de la memoria 
disponible. La línea 20, en cambio, nos 
hace ver ya la diferencia entre los dos 
métodos. En el primer caso el BASIC 
ha dejado espacio suficiente para que 
A$ pueda crecer todo lo que quiera, y 
tras él se ha insertado B$. 

La segunda solución ha añadido B$ 
directamente detrás de A$. 

El problema de esta solución aparece 
en la línea 30. Dado que A$ no cabe en 
su actual emplazamiento. Por esta ra- 
zón se elimina la antigua A$ y se crea 
una nueva copia detrás de B$. 

Con el primer método, sin embargo, 
A$ puede crecer directamente sin nin- 
gún problema. 

El principal inconveniente del pri- 
mer método es que derrocha gran 



cantidad de memoria (todos los strings 
ocupan 256 caracteres, aunque estén 
vacíos). El inconveniente del segundo 
sistema es míe es lento, ya que hay que 
ir moviendo strings, y además deja 
huecos en la memoria difícilmente 
aprovechables. 

Tantó un método como el otro son 
bastante malos, y por ello otros len- 
guajes "pasan" olímpicamente de los 
strings con longitud variable. Sin em- 
bargo existe una serie de rutinas que 
permiten mejorar ostensiblemente el 
segundo método: las rutinas de garbage 
collection. 

GARBAGE COLLECTION 

Una rutina de garbage collection es, 
si tomamos la traducción literal, una 
rutina recogedora de basura; y es eso 
precisamente lo que hace. El garbage 
collector es el encargado de recoger 
todos los huecos que se van generando 
por el manejo normal de las cadenas y, 
a partir de ellos, generar una nueva 
zona libre de memoria que se pueda 
aprovechar. El problema del garbage 
collection es que es una rutina lenta. 

En el BASIC se ha optado por esta 
solución. Se utiliza el segundo método 
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con un complejo sistema de garbage 
collection. Debido a esto, y para opti- 
mizar al máximo este proceso, la me- 
moria de cadenas de los MSX se halla 
separada del resto de memoria. 

MEMORIA DE STRINGS 

Vemos, por tanto, que los strings 
disponen de una zona de memoria 
especial. El tamaño de esta memoria, al 
encender el ordenador, es de 200 bytes 
(permite almacenar algo menos de 200 
caracteres); pero podemos cambiarlo 
cuando deseemos gracias a la instruc- 



cadenas de caracteres, veamos cuáles 
son las instrucciones que nos ofrecen 
para poder trabajar con ellas. 

Algo tan sencillo como una asigna- 
ción del tipo A$="PEPE" no puede, 
por ejemplo, realizarse en las primeras 
versiones de PASCAL. En C, en cam- 
bio, sí puede hacerse; pero lo que no 
podremos hacer es B$=A$ + "MAR- 
TINEZ". La concatenación de strings 
es otra de esas operaciones que echare- 
mos de menos en cuanto dejemos el 
BASIC. 

Pero el BASIC nos ofrece otras 




ción CLEAR. CLEAR borra toda la 
memoria (tanto la de strings como el 
resto de memoria de datos) y permite, 
además, reorganizarla. Veamos un 
ejemplo: 

CLEAR 500, &HC000 

Esta instrucción, en primer lugar, 
borra todas las variables. Tras esto, el 
parámetro 500 le indica que debe 
reservar para cadenas un total de 500 
bytes. Finalmente se Je indica que la 
memoria utilizable por el BASIC ter- 
mina en la dirección hexadecimal 
&HC000. Si no hubiera espacio 'sufi- 
ciente para cadenas, obtendríamos un 
mensaje de error indicándolo. 

Podemos utilizar, también, CLEAR 
con sólo el primer parámetro. CLEAR 
800, por tanto, reservará 800 bytes para 
el manejo de strings. 

Si por alguna razón utilizamos con 
variables de cadenas más espacio del 
disponible obtendremos un desagrada- 
ble error: Out of string space. 

MANEJO DE CADENAS 

Ahora que sabemos cuáles son los 
problemas que los programadores del 
BASIC han tenido que superar para 
poder implementar eficientemente las 



instrucciones para trabajar con strings. 
Veámoslas paso a paso: 

RIGHT$(A$, X), retorna los X ca- 
racteres situados más a la derecha de X. 
Por ejemplo RIGHT$ ("DIPLOCO- 
COS", 5)="COCOS*\ 

LEFT/(A$, X) funciona de forma 
similar, solo que por la izquierda. Así 
LEFT$("ESTAFILOCOCOS", 6) = 
"ESTAFI". 

MID$(A$, X) retorna TODOS los 
caracteres que haya en A$ a partir de la 
posición X. De este modo MID$ 
("BACTERIAS", 4) = "TERIAS". 

MID$(A$, X, Y) retorna los Y 
primeros caracteres de A$ contando a 

f>artir de la posición X. Sería equiva- 
ente a LEFT$(MID$(A$, X), Y). Por 
ejemplo MID$("BACTERIAS", 4, 
2)= "TE". 

MID$(...) también puede utilizarse 
en la parte izquierda de una igualdad. 
De este modo también son válidas 
sentencias como 

10 A$="PEPE ES MI TIO" 
20 MID$(A$, 4, 1)="A": MID$(A$, 
14, 1)="A" 

INSTR (A$, B$) localiza la primera 
aparición de B$ dentro de A$. Así 
INSTR("PEPE", "PE")=1. INSTR 



retorna el valor cero es porque no 
existe B$ dentro de A$. Cuidado con 
no mezclar mayúsculas y minúsculas. 

INSTR(A$, B$, X) localiza la prime- 
ra aparición de B$ dentro de A$ a 
partir de la posición X, excluyendo 
esta última. Ejemplo: INSTRfPEPE", 
"PE", 1)=3. 

STRING$(N, C) retorna un string 
que contiene N veces es carácter cuyo 
código ASCII es C. Así STRINGS 
(5,65) = "AAAAA". 

STRING$(N, X$) retorna un string 
que contiene N veces el carácter conte- 
nido en X$. Es importante que X$ 
contenga un único carácter. 

LEN(A$) retorna la longitud -nú- 
mero de caracteres- del string A$. 

ASC(A$) retorna el código ASCII 
del primer carácter de la cadena A$. 

CHR$(X) retorna un string de lon- 
gitud 1 que contiene el carácter cuyo 
código ASCII es X. 

VAL(A$) retorna el valor real rela- 
cionado con la cadena A$. Si la cadena 
A$ no contiene un número válido 
retorna cero. 

STR$(X) retorna la cadena que con- 
tiene el número X. 

SPACE$(X) retorna una cadena con 
X espacios en blanco. Es equivalente a 
STRING$(X,32). 

Existen luego, otras muchas instruc- 
ciones que tienen que ver directamente 
con los strings, aunque no ayudan a su 
tratamiento. Nos referimos a todas las 
funciones que devuelven strings como 
HEX$, BIN$, OCT$, MKI$, MKD$, 
MKS$ o a las que nos permiten impri- 
mirlos o leerlos INPUT, INPLJTS, 
INKEYS, PRINT... 

UN ULTIMO DETALLE 

Sólo comentaros un último detalle. 
Los strings se almacenan en memoria 
de un modo un tanto peculiar. Debido 
a esto y al uso del garbage collector se 
pueden conseguir trucos muy intere- 
santes. Pero como siempre, dejamos 
que seáis vosotros quienes os rompáis 
el coco. Hasta la próxima... 
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-SYGRAM- 
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-SYGRAM- 



(1) STRIP POKER II 
PLUS 



Distribuidor: SYSTEM 4 
Formato: cassette 



De nuevo llega hasta nosotros un 
nuevo STRIP POKER dispuesto 
a satisfacer la demanda de los adictos a 
este tipo de programas. 

El objetivo del juego, para aauellos 
que no hayan tenido oportunidad de 
probar alguno de los existentes en el 
mercado, consiste en mantener una 
disputada partida de poker con una 
exhuberante rival femenina que irá 
despojándose de sus prendas a medida 
que la dejamos sin dinero. 

Al comenzar a jugar, cada jugador 
dispondrá de 100 dólares iniciales, 
siendo la apuesta inicial de 5 dólares. 

Una vez se haya realizado la apuesta, 
en la parte inferior de la pantalla 



observaremos las cartas que nos han 
correspondido en dicha mano. 

En la pane inferior izquierda dis- 
pondremos de varias opciones que nos 
permitirán modificar nuestra jugada: 

-STAY, nos permite quedarnos y 
esperar la acción del contrincante. 

-DROP, abandonamos y el contrin- 
cante se lleva el bote acumulado. 

-BET, nos permite apostar. 

-RAISE, elevar la apuesta. 

-CALL, modificar nuestras cartas. 

Cada vez que nosotros o nuestra 
contrincante se quede sin dinero, debe- 
rá entregar una prenda a cambio de 100 
dólares que le permitan seguir jugando. 
Para volver a recuperar la prenda, se 
deberá entregar 100 dólares a cambio 
de ella. 

Cada nueva mano dispondremos de 
las siguientes opciones: 

-Jugar una nueva mano. 

-Observar la chica. Se suprimen los 
marcadores inferiores. 



A* 



/ 



-Comenzar de nuevo. 

-Jugar contra otra chica. Para ello 
seleccionaremos esta opción y cargare- 
mos la segunda cara del cassette. 

-Salir del programa. 

El programa, en lo que respecta a 
gráficos y sonido, se ha quedado bas- 
tante corto en comparación con otros 
programas del mismo estilo. Sin em- 
bargo la nueva posibilidad de jugar 
contra otras contrincantes -programas 
datas; de ahí lo de Plus- nos llevará, 
próximamente, a nuevas situaciones 
con este programa MASTER. ¡Esplén- 
dido!. Para aficionados al erotismo. 

STRIP POKER D PLUS 

1 2 ) 4 5 6 7 8 910 

+++++++ 
+++++++ 
+++++++ 
++++++ 
++++++ 
++++++ 



...en d primer minuto 
...en la primera hora 
...en el primer día 
...al cabo de una semana 
...al cabo de un mes 
.i cabo de un año 
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(2) ARRANOID II 



NIDECOM 
Distribuidor: Discovi 



Informatic 



Transcurrido el tiempo, la inmensa 
fortaleza del emperador DOH ha 
vuelto ha renacer en un lejano planeta 
de la galaxia de XORTRAX. 

DOH, jefe supremo de la fortaleza, 
ha decidido enviar hacia nuestro plane- 
ta una gigantesca nave dispuesta a 
tomarse la revancha por la derrota 
sufrida hace ya varias décadas. 

Alertado el centro de defensa espa- 
cial terrestre, se envía a su encuentro 
un avión de combate denominado 
VAUS II, procedente de la base estelar 
ARKANOID. 

VAUS II deberá librar al planeta de 
la invasión de Spacewalls, una especie 
de ladrillos espaciales que protegen a 
DOH y que amenazan con mtroducir- 
se en la atmósfera terrestre. Para ello 
cuenta con una potente bola de energía 
que le permitirá ir destruyendo a los 
Spacewalls y abrir un camino para 
poder acceder hasta DOH. 

Pero, ¡CUIDADO!, la venganza de 
DOH es imprevisible. 

Este argumento nos introduce en la 
presentación de la segunda parte del 
conocido ARKANOID, el rompe-la- 
drillos más famoso y adictivo de la 
historia del software. 



ARKANOID II ha llegado a nues- 
tro país gracias a Discovery y ha sido 
realizado por la desconocida firma 
Nidecom en cartucho megarom para 
los MSX-2. 

El planteamiento no mantiene mu- 
chas diferencias respecto a su predece- 
sor, consistiendo nuestro principal 
objetivo en romper todos los ladrillos 
que aparezcan en la pantalla para poder 
acceder a la siguiente. Pero, incluye 
una serie de posibilidades que no tenía 
la primera parte. 

Ente ellas se encuentra la ampliación 
de las diversas opciones que nos ofre- 
cen algunos ladrillos cuando son des- 
truidos y vendrán representadas por 
una letra. 

S. Se reduce la velocidad energética 
de la bola. 

C. Puedes coger la bola energética y 
dispararla con el botón de fuego. 

L Puedes disparar la bola con efecto. 

T. Divide a VAUS II en dos partes. 

R. Reduce a VAUS II a la mitad y 
duplica la puntuación. 

L. Puedes disparar con el cañón 
láser. 

B. Puedes escapar por las oberturas 
laterales. 

P. Una vida extra. 

M. Bola mega. Destruye todos los 
ladrillos. 

E. Se amplía la longitud de VAUS II. 

D. La bola energética se divide en 
ocho partes. 

N. Triplica la bola energética. 

La segunda posibilidad se refiere a la 
opción de competir contra el ordena- 
dor o contra otro contrincante si selec- 



cionamos el modo VS en el menú 
principal. La partida consta de cinco 
rounds diferentes, venciendo el que 
antes consiga tres de ellos. Cada juga- 
dor dispone de tres bolas, las cuales 
tiene que lanzar hacia la zona contra- 
ria. Por cada bola mal rebotada se le 
añadirá un punto, venciendo el que 
antes llegue a cero. La tercera posibili- 
dad nos permite configurar libremente 
la pantalla del juego si seleccionamos la 
opción EDIT en el menú principal. 

Después de elegir el round que 
deseamos editar (1-5), podremos situar 
a nuestro antojo los distintos tipos de 
ladrillos y además asignarle a cada uno 
una opción especial. 

Si lo deseamos, podemos grabar en 
cinta nuestros diseños para no limitar- 
nos a las pantallas incluidas en el juego. 

La cuarta posibilidad, quizás la más 
atractiva del programa, es la de incluir 
junto con el cartucho un joystick 
especialmente diseñado para el juego. 
Consta de un pequeño mando cilindri- 
co cuyo giro nos permitirá mover la 
nave con gran precisión y de un botón 
superior para el disparo. Su diseño es 
muy cómodo y práctico y de agradable 
presentación. Para jugar, también po- 
demos hacer uso de las teclas del 
cursor. 

Cada cierto número de rounds, de- 
beremos enfrentarnos a un gran enemi- 
go que necesitará de varios impactos 
para ser destruido. Uno de ellos será 
DOH y el otro BOSS, un cerebro en 
proceso de regeneración. 

El nivel gráfico y sonoro del progra- 
ma se mantiene dentro de la línea de 
calidad alcanzada por su predecesor, 
eso sí, mejorado con las posibilidades 
que brindan los MSX-2. Su nivel de 
adicción es terriblemente alto y se 
mantiene durante todo el juego. 

En definitiva, una segunda parte que 
ha sabido mantener las características 
de la primera y añadirle nuevas opcio- 
nes para hacerlo más interesante. PA- 
RA AFICIONADOS A ROMPER 
LADRILLOS. 

NOTA: Para acceder al gran BOSS, 
podemos pulsar la tecla ESC que nos 
permitirá llegar hasta el nivel 17, EL 
GRAN BOSS. Lo demás será por 
cuenta vuestra. 



ARKANOID n 

Adicción 

...en d primer minuto 
...en la primera hora 
...en el primer día 
...al cabo de una semana 
-i cabo de un mes 
...al cabo de un año 
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(3) TUAREG 



topo son 

Distribuidor: ERBE 
Foi 



Ait-Amar, hija del sultán Addul 
Aziz, ha sido secuestrada por un 
grupo de guerrilleros bereberes a las 
órdenes de Krustafá Abdir, un tuareg 
sin escrúpulos que deshonró los códi- 
gos de honor de su noble pueblo y 
tuvo que ser desterrado. 

Para liberarla, Abdid exige al sultán 
la mitad de todos sus bienes antes de 
tres días. 

En vista de la grave situación, el 
sultán ha elegido al joven Ben-Yussef, 
capitán de su ejército personal, como el 
encargado de la liberación de su her- 
mosa hija. Si consigue liberarla, Aziz le 
otorgará la mano de su hija. La recom- 
pensa merece la pena. 

Este argumento da entrada a un 
nuevo programa de Topo soft, una 
videoaventura donde deberemos en- 
carnar al intrépido Ben-Yussef en bus- 
ca de la hija del sultán de Marrakech en 
un ambiente repleto de misterios, peli- 
gros y de los encantos de las ciudades 
árabes. 

Nuestro protagonista deberá reco- 
rrer diversos barrios de Marrakech, 
formados por innumerables casas y 
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edificios de estilo árabe y enfrentarse a 
numerosos secuaces de Abdir. 

Durante el recorrido, Ben-Yussef 
podrá pedir información a distintos 
personajes que surgirán a su paso, 
comprar armas, robar y además deberá 
dormir y comer para reponer su ener- 
gía. 

Como marcadores, en la parte infe- 
rior de la pantalla dispondremos de los 
siguientes: 

-Indicador de energía. 

-Precio de los objetos que podemos 
comprar. 

-Nombre del barrio. 

-Una brújula de dirección. 

-Un reloj. De 1 a 2 podemos comer, 
de 10 de la mañana a 8 de la noche 
comprar armas y a partir de las 12 de la 
noche dormir. 

-Indicador del arma y de la muni- 
ción disponible. 

El nivel gráfico del programa es 
bastante elevado, al igual que su alto 
grado de adicción y originalidad. 

En definitiva, un programa que ha 
sabido combinar en su desarrollo ele- 
mentos de videoaventura interactiva y 
una buena dosis de acción. PARA 
AFICIONADOS A LAS VIDEO- 
AVENTURAS. 

TUAREG 
Adicción 

...en el primer minuto 
...en la primera hora 
...en el primer día 
...al cabo de una semana 
...al cabo de un mes 
...al cabo de un año 
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(4) BRUCE LEE 



En una recóndita y misteriosa for- 
taleza situada en el valle de Green 
Yamo, se encuentra el gran brujo 
Sung-lin, conocedor del secreto de la 
inmortalidad y de la riqueza infinita. 

Son muchos los que han intentando 
llegar hasta ella, pero Sung-Lin lo ha 
impedido enviando contra ellos peli- 
grosos enemigos y situando diversos 



inconvenientes en los lugares más es- 
tratégicos de la fotaleza. 

Pues bien, en esta parte de la historia 
entras tú encarnando al mítico Bruce 
Lee, maestro en artes marciales, e 
intentando con tu habilidad entrar en 
el interior de la fortaleza y acceder a la 
habitación de Sung-Lin para arrebatar- 
le sus secretos. 

Deberás recoger las diferentes lám- 
paras que encontrarás en las habitacio- 
nes de la fortaleza, debiendo saltar y 
trepar en algunos casos para llegar 
hasta ella. Una vez lo hayas hecho, 
podrás acceder a la siguiente estancia. 

Durante la búsqueda del brujo, de- 
berás tener mucho cuidado con los 
ninjas y los luchadores japoneses, de- 
biendo emplear eficaces golpes de kára- 
te para eliminarlos. 

Bueno, después de comentar el jue- 
go, sólo nos queda decir que el progra- 
ma está incluido dentro de la denomi- 
nada serie barata de MASTERTRO- 
NIC y por lo tanto no debemos 
sorprendernos cuando nos encontre- 
mos con un programa bastante pobre 
en gráficos y sonidos y con un nivel de 
programación no muy elevado. 

En definitiva, un programa que, 
dado su precio y su nivel de adicción, 
puede hacernos pasar un buen rato. 
PARA AMANTES DE LAS ARTES 
MARCIALES. 

BRUCE LEE 

1 2 3 4 5 6 7 8 9 10 

+++++++ 
++++++ 
++++++ 
+ + + + + 
+ + + + + 
+ + + + + 



Adicción 

...en el primer minuto 
...en la primera hora 
...en el primer día 
...al cabo de una semana 
...al cabo de un mes 
...al cabo de un año 



(5) SABOTAJE 




Las negociaciones sobre los dere- 
chos de explotación del cinturón 
de asteroides situado entre Marte y 
Júpiter por parte de las confederacio- 
nes estelares europeas y americanas ha 
supuesto un grave fracaso ante las 
espectativas de acuerdo esperadas. 

El enfrentamiento armado no puede 
tardar mucho en producirse, y ambas 
confederaciones están poniendo a pun- 
to sus últimos prototipos en armas de 
alta sofisticación y poder destructivo. 
Según espías de la confederación euro- 
pea, miembros de la confederación 
americana han conseguido desarrollar 
un arma nuclear de gran alcance y cuyo 
empleo en el enfrentamiento decantaría 
la victoria a su favor. 

El estado mayor de la confederación 
europea ha decidido infiltrar en la base 
militar americana un nuevo prototipo 
de robot-elevador cuya misión consis- 
tirá en localizar y sabotear la nueva 
arma nuclear. 

SCORBOT, que así se denomina el 
robot, deberá recorrer la base enemiga 
recogiendo bidones de combustible, 
desactivando rayos de fuerza y cogien- 
do tarjetas para poder acceder a los 
diferentes sectores que componen la 
base enemiga. 

Una vez haya logrado hacerse con el 
arma, deberá retornar a la primera 
pantalla para dar por finalizada su 
misión. 

Como marcadores dispondremos de 
los indicadores de puntuación, de com- 
bustible y del número de vidas dispo- 
nibles. 

En definitiva, podemos afiwnar que 
se trata de un programa bastante sim- 
ple en lo que respecta a gráficos y 
sonidos, destacando a su favor el nivel 
de adicción, el precio y su contribución 
a incrementar el software nacional. 
PARA AMANTES DE LA CIEN- 
CIA FICCION. 



SABOTAJE 



Adicción 
..en el primer minuto 
..en la primera hora 
..en el primer día 
..al cabo de una semana 
..al cabo de un mes 
..al cabo de un año 
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++++++ 
+ + + + + 
+ + + + + 




(6) BLOODY 



Bloody, un extraño habitante del 
planeta Aramo, ha decidido reali- 
zar una visita a nuestro planeta. 

Pero el motivo de su visita no es 
precisamente en plan turístico, ya que 
durante sus viajes interplanetarios, 
Bloody ha detectado en la Tierra la 
existencia de un alimento de propieda- 
des similares al utilizado por los habi- 
tantes del planeta Aramo en su dieta: la 
sangre humana. 

Lo primero que se le ha ocurrido a 
Bloody es dirigirse hacia el banco de 
sangre del hospital general con el 



propósito de obtener la máxima canti- 
dad de sangre posible para llevar a su 
planeta. Lo que Bloody desconoce es la 
existencia de determinados virus que le 
atacarán en el momento en que aban- 
done su nave, además de los efectos de 
la gravedad sobre su cuerpo. 

Durante su recorrido en el interior 
del hospital, Bloody será atacado por 
infinidad de virus de las más diversas 
formas (pastillas, setas, comecocos, 
etc.) debiendo evitar colisionar con 
ellos a la vez que lucha por vencer la 
fuerza de la gravedad. 

Cuando su nivel de energía sea bajo, 
podrá reestablecerlo cogiendo diversas 
jeringuillas blancas que aparecerán du- 
rante el trayecto. 

Como marcadores dispondremos de 
los siguientes: 

-Indicador de energía. Representado 
por una jeringuilla. 

-Puntuación. 

-Vidas disponibles. 

-Célula. Deberás coger las que ten- 
gan el mismo color. 

En conclusión, podemos decir que si 
bien no es un juego que brille en lo que 
respecta a gráficos y sonidos, su nivel 
de adicción y dificultad es lo suficien- 
temente alto para no abandonarlo en la 
primera partida. PARA LOS SE- 
DIENTOS DE SANGRE. 



BLOODY 

1 2 3 4 5 6 7 8 910 

+++++++ 
++++++ 
++++++ 
+ + + + + 
+ + + + + 
+ + + + 



Adicción 

...en el primer minuto 
...en la primera hora 
«.en el primer día 
...al cabo de una sema, 
...al cabo de un mes 
...al cabo de un año 
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iPor J. Angel Holgado 



BLUE BIRD 



Este pequeño programa 
consta de dos pantallas. La 
primera muestra un texto ex- 
plicativo con las cualidades de 
este famoso vehículo, así como 
referencias a su propietario y 
fecha de fabricación. La segun- 
da pantalla tan solo es una 
panorámica de este automóvil 
con línea futurista. 



10 
20 ' 
30 ' 
40 ' 
50 ' 
60 1 
70 1 
80 ' 
90 ' 
100 
110 
120 




130 '# 



##################### 
##################### 

# REALIZADO POR: # 

# # 

# J . ANGEL HOLGADO # 
'# # 
1 # PARA # 
'# # 



MSX - CLUB 



##################### 



******* *TEXTO ******** 



140 
150 
160. 
170 ' 

180 KEYOFF : SCREEN0 : WIDTH40 : COLORI 5 
,4, 1 :LOCATE18, 1 : PRINT"BLUEBIRD" 
190 PRTNT: PRTNT" El Bluebird (paj- 
aro azul), de 1935 con el que Mal 
cora Campbell alcanzó la velo 
cidad de 484.818 km/h..La linea de 

su carrocería es un clasico perf 
il de huso asimétrico, al que se 

le ha a fiad i do una aleta para la 

estabilidad res 
200 PRTNT" pecto al viento l&fcera 
1 . El Bluebird estaba accionado 

por un motor Rolla Roy ce de 3 

6 . 532 ce . " 
210 FORX-QT023 

220 LOCATEX,18:PRINT" PULSA UNA TE 
CLA " 

230 FORY-0TO30 :NEXTY 
240 LOCATEX , 18 : PRINT" 

250 NEXTX 

260 IF INKEY$=""THEN210 EL SE 270 
270 CLS:LOCATE12. 10:PRINT"ESPERA U 
N MOMENTO" 

280 FORT-0TO1000:NEXTT 
290 

300 R£M* * * * * GRAFICO BLUE-BTRD***** 




310 
320 
330 
340 
NT ( 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
5^0 
0, 1 



3CREEN2 

DEFUSR1-SH41:A-USR1(0) 
CXRCLE( 120,46) , 37 , 1 0 , , , 1 . 4 : PAI 
120,56) . 10 
F0RR-3TO9STEP2 

CIRCLE(96, 104) .R 1.4 

CIRCLE(173,104) ,R 1.4 

NEXTR 

CIRCLEÍ96.104) ,14 1.4 

CTRCLE ( 173 , 104) , 14 1.4 

'****BUCLE REJILLA**** 

FOR I - 1 1 7TO 127 STEP 2 

CIRCLECI.92) ,2 9 

NEXTI 

•****BUCLE CARROCERIA**** 

FORI-0TO38 

READX,Y,Z',Q 

I.INEÍX.Y)-(Z,Q) 

NEXTI :RFSTORE720 
i 

' ****PAISAJE**** 

LTNE( 0 , 1 22) - ( 255 .122) . 13:LTNE( 
20)-(255, 120) 
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REGALATE UN LIBRO 
VITAL PARA EL 



580 UNE (O, 68) -(255,68) , 12:LINE(0. 
69)-(255.69) 

ñQO IINE(0,69)~(255.120) ,15,B 

600 PSET(0,68) : DRAW"cl2E12F5E40R2F 

30E3F3E2F3E5F4R2E20F10R5E8F14R7E15 

R3D2F5É21F45" 

610 PATMTC^O, 60) ,12: PAINTf 20 , 72) ,1 
5:PATNT(20,130) ,13 
620 OPEN"GRP: "AS#1 

630 PSET(50,140) ,13:PRINT#1, R L 

U E B I R D -" 
640 PSET (51, 140 ) , 13 : PRINT*1 , "- B L 

If F B T R D -" 
650 PSET(58, 180) , 13:PRINT#1 , "-PULS 
A UNA TECLA-" 
660 CL0SE#1 

670 DEFUSR2-&H44 : A-USR2 ( O ) 
680 IFTNKEYS- " "THEN680ELSE180 
690 1 

700 '****DATAS CARROCERIA**** 

710 ' 

720 DATA 87,111,69,111,69,111,67,1 
09, 67, 109,67, 106,67, 106,66, 103,66, 
l 03 . 76 , 97 , 76 , 97 , 87 , 93 , 87 , 93 , 87 . 94 , 
87, 94,89,93,89,93, 106,86, 106,86, 11 
3 , 85 , 1 1 3 , 85 , 1 35 , 85 , 1 35 , 85 , 1 44 . 86 . 1 
44,86, 158,83, 158, 83, 162, 79, 162, 79, 
164.89, 164,89,173,89,173,89, 173,79 
, 173,79 

730 DATA 217,73,217,73,220,81,220, 
81,224,87,224,87,231,95,231.95,231 
, 96, 231 , 96, 226. 99, 226, 99, 222, 103, 2 
22, 103, 196, 108, 196, 108. 183. 109, 104 
, 110, 166, 110, 166,95, 133,95, 133,95, 
102 . 93 , 180 , 93 , 201 . 96 . 201 , 96 , 222 , 1 O 
3, 186,77, 186, 93, 164,89. 154,87, 154. 
87,158,83 

740 DATA 139,86,139,110,114,84,114 
,95,139,88,114,88,89,93,89,90,89,9 
0,94,90 



Test de listados i 



10 




56 


200 


-182 


390 


-138 


580 


- 67 


20 




58 


210 


-217 


400 


-215 


590 


- 77 


30 




58 


220 


- 94 


410 


- 58 


600 


-245 


40 




58 


230 


-247 


420 


- 58 


610 


-187 


50 




58 


240 


-140 


430 


- 58 


620 


-224 


60 




58 


250 


-219 


440 


-148 


630 


-118 


70 




58 


260 


-100 


450 


-201 


640 


-119 


80 




58 


270 


-162 


460 


-204 


650 


- 47 


90 




58 


280 


-199 


470 


- 58 


660 


-233 


100 




58 


290 


- 58 


480 


- 58 


670 


-198 


110 




58 


300 


- 0 


490 


- 58 


680 


-217 


120 




58 


310 


- 58 


50,0 


-217 


690 


- 58 


130 




58 


320 


-216 


510 


-103 


700 


- 58 


140 




58 


330 


-194 


520 


-247 


710 


- 58 


150 




58 


340 


-152 


530 


-114 


720 


-240 


160 




58 


350 


-185 


540 


- 58 


730 


-194 


170 




58 


360 


-191 


550 


- 58 


740 


-130 


180 




53 


370 


- 12 


560 


- 58 


TOTAL ; 










^13 


570 









UN LIBRO 
PENSADO PARA 
TODOS LOS 
QUE QUIEREN 
INICIARSE DE 
VERDAD 
EN LA 

PROGRAMA- 
CION BASIC 

Construcción de 
programas. El potente 
editor todo pantalla. 
Constantes numéricas. 
Series, tablas y 
cadenas. Grabación de 
programas. Gestión de 
archivo y grabación 
de datos. Tratamiento 
de errores. Los 
gráficos del MSX. 
Los sonidos del MSX. 



" W ' "<i<>sí, ON/w , 




Introducción al 
lenguaje máquina. 



Y ADEMAS PROGRAMAS DE EJEMPLO 

Alfabético. Canon a tres voces. Moon Germs. Bossa Nova. Blue 
Bossa. La Séptima de Beethoven. La Flauta Mágica de Mozart. 
Scrapple from the apple 8c Donna Lee. The entretainer. Teclee un 
número. Calendario perpetuo. Modificación Tabla de colores 
SCREEN 1. Rectángulos en 3-D. Juego de caracteres alfabéticos en 
todos los modos. Juego Matemático. Más grande más pequeño. 
Póker. Breackout. Apocalypse Now. El robot saltarín. El archivo 
en casa. 



Deseo me envíen el libro de los secretos del MSX, para lo 
cual adjunto talón de 1.500 ptas. a la orden de MAN- 
HATTAN TRANSFER, S.A. 

Nombre y apellidos 

Calle u n.° 

Ciudad CP 

Este boletín me da derecho a recibir los secretos MSX en 
mi domicilio libre de gastos de envío o cualquier otro 
cargo. No se admite contrareembolso. 

Importante: Indicar en el sobre MANHATTAN 
TRANSFER, S.A. 

«LOS SECRETOS DEL MSX» 

Roca i Batlle, 10-12 Bajos - 08023 BARCELONA 
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Programa B 



B Por José Pertinéz Ruíz, 



ADAPTADOR 
GEN DISK 



£1 título de est^ utilidad está 
basado en un programa adap- 
tador del ensamblador GEN de 
Hisoft a disco. Es decir, a partir 
de ahora podremos utilizar el 
ensamblador en disco con las 
ventajas que ello comporta. En 
el programa se incluyen las 
instrucciones de manejo. 



10 
20 
30 
40 
50 
iz 
60 
70 
30 

90 ' 
100 



ADAPTADOR GEN - DISK 
Por José Francisco Pertiñez Ru 

Descripción y funcionamiento 



110 ' 
120 1 
130 ' 

140 CLEAR 300:KEYOFF:SCREEN0:WIDTH 
37: COLOR 15.4,4:0N STOP GOSUB 140: 
STOP ON:ON ERROR GOTO 140 
150 PRINT:PRINT:PRINTTAB (9) "ADAPTA 
DOR GEN DISK" 

160 PRINTTAB(9) '•——-——««—- 

170 PRINT" Este programa 3irve par 
a adaptar el ENSAMBLADOR GEN de IV 
ESON.PE CASSETTE* DISCO. " 
180 PRINT: PRINT"-Esto se consigue 
parcheando las ru- tinas de Entrad 
a/Sal ida del cassette y añadiendo 
las correspondientes de control d 
e la UNIDAD DE DISCO." 
190 PRINT : PRINT" --F1 programa resul 
tante permite car- gar, grabar y ve 
riflcar programas comosi de una ve 
rsion disco se tratase y de la mis 
ma forma que s«* hace con la ver si o 
n cassette. A este programa nos ref 
er i remos a .partir de ahora con el 
nombre de GEN " ; 

200 PRTNT"DISK. " : PRTNT: PRTNT : PRINT 
" Pulse una tecla para continuar 

"; :A$=INPUT$(1) 
210 ' 
220 ' 
230 



240 
250 



260 1 
270 1 

280 CLS : PRINT : PRINT : PRINTTAB ( 8 ) "ME 
NU PRINCIPAL" : PRINTTAB (8) «— 
— : PRINT: PRINT" 1-C0NVERSI0 
N DEL PROGRAMA" -.PRINT: PRINT" 2-1 
NSTRUCCIONES DE GEN DISK" : PRINT ; PR 
INT" 3-FIN DEL ADAPTADOR" : LOCATE 
, 16 :PRINTTAB(8) "ELIJA UNA OPCION " 

290 A-VAL (INPUT$(1 ) ) :Á— A*(A<4) :ON 
AGOTO310,600.710:GOTO 280 
300 1 
310 ' 
320 ' 



MENU PRINCIPAL 



330 
340 



CONVERSION DEL PROGRAMA 



350 ¡ 
360 ' 

370 CT,5 : PRINT" Pulse PLAY en el ra 
Bsétté con e1 ensamblador GEN d 
entro y pulse una tecla "::A$=TN 
P1 (T$ ( 1 ) 

380 BL0AD"CAS : " . RH1 000 
3QQ PRINT : PRTNT ¡ PPINT" Introduzca 
un d i te «n la unidad y pulse u 
na tecla i : A$«INPUT$ ( 1 ) 
400 A-&NF0 • B-&H58 ■ 00 • POKE&H9A.1 C . B 
: POKE&H9A2P . B : POKERHA 1 28 , B : POKE&HA 
F03 . n : POKE&H99FA , C : POKFRH9A06 . C ■ PO 
KE&H99CA . C ; POKE&H99CB . C : POKE&H99CC 
. C • POKER HOA29 . 0 • POKFRH9A2A , C ■ POKER 
H9A2B .. C • POKE&H9A3E , C : POKERH9A3F , C : 
P0KE&H9A4Q C : POKE&HO* IDA- POKER HQA 
2E. A 

4 1 0 POKFR.HA 3 29 . A : P0KE&H99FB . A : POKE 
&H9A07 . A 

■]? Af- H 0 BL0AP ,, K'HR$Í34) * "OEND .PT 
N"+CHR$ ( 34 . -RH1000 : BI.OAD"+CHR$ ( 
3¿ ) f "GEND . DK" f CHP$ ( 34 ) *■ " • DEFUSR= r -H 
8800 : ?USR ( 1 28 | : DEFTJSR-&HFFF0 : DELET 
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ÉÓ " M7|^f(T?^ ~) • ENH" + PHP$ ( 

1?) :0?EN"nEN"FOROUTP'.ITAS#l :PRTNT#1 

430 ^SAV'C'-IEND . BTN" . ^H9300 . f.HBEOD 

440 FOR]-£HEOOUTO&HE14F:READ A$ : PO 

KET . VAL f "£H" »-A$) • NEX' r 

450 BSAVE"GENP . DK M , &HE000 , &HE14F rP 

PTMT • PFTN' r ; PPTMT" FINAL ADA T.A APA 

PTA C ION" ¡ FOR ' - OTO 2 0 O O - NEXT : GOTO 3 4 

0 

460 ' 
470 1 
480 
I.. 

490 

50 n 

510 ' 

520 1 

5 , 3A ,3 A , E l . P.7 . 20 . 1 6 , CD . E2 , EO , 1 1 , 2A 
,F1 , F, '! fi . 'T>, 7D, , 21 ,0,0. 22,4B,F1 / 
?F, 1,32, 1A,E1 , 11 ,4E,E1 ,E, U,CT>,7T>, 
F3 , 2 A , 30 , FA , 1 1. , 4E , El , J . O . 4 . ED , BO , 1 
540 DATA 0,4,EP,43, 38, El, ll,2A,El f 
21 J.,Q,E,26,CD,7D,F3,C1,79,B7.CC.D 

6 . EO . El , DI , Cl , DD, El , C3 , E2 , FF, CD, EQ 
,FF,!>D,E3,e , 5.D5,3A, 1A,E1 ,B7,20, 14, 
CD»E2,E0,11 ,2A,E1,E,F,CD,7D,F3,B7, 
°o 

550 DATA 4D,21...0,0,22,4B,E1,11,4E, 
El , E, 1A , CD, 7D, F3, 1 , 0 , 4 , ED, 43 , 38, El 
, 11,2A.E1 ,21, 1,0,E,27,CD,7D,F3,21, 
4E,E1,ED,5B,30,FA, 1 , O , 4 . ED , BO , 3A , 1 
A,E1,B7,CC,CF,E0,3E,1, 32, 1.A.E1 
560 DATA 3A,19,E1,D6,4,DC,D6,E0,32 
, 19 , El , DI , C 1 , DD , El , 2A , 30 , FA , C3 , E2 , 

1,2A,E1,AF,32,1A,E1,E,10,C3,7D,F3, 
1 1 ; 4E 



PVJTTNAS PF FNTPAPA/SAI.TPA PF 



T;70 DATA F1,.3E,P, 12,E,A,rp,7D,F3.2 

1 , 2B, El, 6, B, 36,20,23, 10, FB, 13, 13, E 

B, E, 9, 11 , 2B,E1 ,CD,C,E1,P8, 11, 33, El 

,E,3,EA,C,E1,23,7E,FE,2E,C8,FE,D,3 

F,C8, ED.AO,EO. 1 8, F3, O, O , 46 , 69 

580 DATA 6C,65,20,6E,6F,74,20,66,6 

F, 75, 6F, 64, 24, O, 20, 20, 20, 20, 20, 20, 

20, 20,20,20,20,0,0,0,0,0,0,0,0,0,0 

,0,0,0,0.0,0,0,0,0,0,0,0,0,0,0,0 

590 ' 

600 1 

610 ' 



TKsmjcQiams de ^fn disk 



Test de listadosi 



620 
630 

640 ' 
650 ' 

660 OT.S : PRTMT" INSTRUCCIONES PE CA 

RGA Y GRABACION" :PRINT" — — 

mmmmmmtmm peitu 

670 PRTNT" COMANDO G : carga de rutin 
a ti de 1 d i se o . t e c 1 •» e 04 - RETURN >+nom 
bre de ar ch i vo -K RETURN > apa recera 
adíng nombre de archivo o File 
not found" :PRINT:PRINT 
680 PP TNT "COMANDO p • gr a ba n i «'. n ríe r 
atina« del disco. Teclee P nl,n2+ 
'RETURN Mnombre de dr ch i vo f < RETURN 
•-.ni- numero de 1 i nea i nicial, n2«nu 
mero de 1 i nea final . " : PR TNT ■ PR TNT 
690 PR I NT " COMANDO V : verificación d 
« rutinas, teclee V+<RETURN>+nom.br 
» de archivos RFTUR N > apare c er á L 
oad j ng nombre de archivo o File n 
ot founcLy verified o failed!" 
"00 T.OCATE2 . 23 : PRTNT"Pn 1 pe una ter 
la para continuar " ; : A$-XÉPUT$ ( 1 ) : 
OTO 380 

71 0 CT,S:PRTNT"SAQMF FT DISCO DE LA 
UN T DAD Y APAGUE EL ORDENADOR " : ENP 



10 


- 58 


ion. 


-202 




-176 


20 


- 58 


?on 


-U7 


380 


- 9 n 


30 


- 58 


210 


- 5« 


390 


-167 


40 


- 58 


220 


- 59 


40p 


28 


50 


- 58 


230 


- 58 


A 1 0 


-166 


60 


- 58 


240 


- 58 


420 


- 36 


70 


- 58 


250 


- 58 


430 


-113 


80 


- 58 


*>6'A 


- 58 


440 


-198 


90 


- 58 


270 


- 58 


450 


- 3Q 


1 no 


- 58 


280 


-123 


460 


- 58 


lio 


- 58 


290 


-165 


470 


- 58 


120 


- 58 


300 


- ^8 


480 


- 58 


130 


- 58 


3 1 0 


- 


490 


- 58 


140 


- 7 


320 


- 58 


500 


- 58 


150 


- 30 


3^0 


- 58 


510 


- 58 


160 


-1 69 


340 


- <5P 


520 


- 58 


170 


-203 


350 


- 58 


530 


- 24 


J.BO 




360 




nm 


-247 



550 


-235 


560 


- 96 


570 


- 13 


,r *ü 


-- 11 


590 


- 58 


600 


- 58 


CIO 


- 5« 


6 2 0 


... so. 


6 30 


- 58 


64 0 


- 




- 


660 


... oo 




-138 


680 


- 1 £9 


690 


-218 


7pn 


- 51- /» 











Por estar haciendo red local 
COMPRO 

ORDENADORES MSX 

* SONY HB-F9S 

* PHILIPS NMS-8245 

* MITSUBISHI ML-G1 
o cambio por 

PC COMPATIBLE 
José Carlos Llorens 
c/Erudito Orel lana, 16-9 
46006 Valencia 
Tel. 96/326 53 37 
Para telefonear. 

- Mañanas de 2:30 a 4:30 

- Noches, después de las 10 

- o dejar nombre y teléfono 
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VIDEOJUEGOS 






Softwarei 



Por Manuel Martínez ■ 



KING'S 
VALLEY 2 



Aaah! La arqueología, esa 
dulce tentación de fatal mi- 
rada, todo un reto para la 
humanidad; ¿quién no re- 
cuerda las aventuras de 
aquel intrépido aventurero 
llamado Indiana Jones? 




Un tema como éste parecía perfec- 
to para el argumento de un juego, 
y a buen seguro que KONAMI lo 
aprovechó cuando lanzó al mercado 
aquel programa que con sólo 16 K nos 
hizo pasar ratos inolvidables de diver- 
sión... ¡y sufrimiento! 

Sin embargo, aquello no le pareció 
suficiente, y no contenta con el nivel de 
dificultad que le puso, ahora nos obse- 
quia con una nueva creación, basada en 
aquélla, con la que pretende hacernos 
sufrir aún más, aumentar nuestro in- 
somnio y sumergirnos en un estado de 
neurosis crónica total, con tendencia a 
la locura; y es que, ¿quién me mandaría 
resolver rompecabezas, con lo sano 
que es matar a los sicarios del Doctor 
Venom? 

UN CEPO PARA CURIOSOS LLAMADO 
"ELGIZA" 

En la primera parte de KING'S 
VALLEY, tuvimos ocasión de com- 
probar como un explorador llamado 
Vick se las veía y deseaba para encon- 
trar la salida a un conglomerado de 
dieciséis pirámides repletas de tesoros, 
pero también de pérfidas momias y las 
trampas más increíbles. Sin embargo, 
aquella gesta fue recordada en las 
generaciones posteriores de tan singu- 




lar personaje como un hecho que 
evidenciaba el don natural que esta 
dinastía poseía con los secretos de 
ultratumba; y así es como Vick XIII, el 
treceavo descendiente de aquel aventu- 
rero (lógico), famoso explorador espa- 
cial que a los mandos de su gigantesca 
nave nodriza recorre el universo de 
cabo a rabo, vió como, mientras toma- 
ba una cerveza en un bar de al lado, dos 
árabes susurraban como Anubis había 
castigado a aquellos infieles que habían 
osado penetrar en las entrañas de su 
pirámide favorita, "EL GIZA", bo- 
rrando sus huellas de la faz de la Tierra 
para siempre. 

Y, como los palos reconocen las 
astillas incluso después de trece genera- 
ciones, Vick XIII no pudo por menos 
que dirigirse a tan singular pirámide y 




adentarse en su interior. Como cabía 
esperar, la pirámide resultó ser una 
trampa para arqueólogos con ganas de 
dar a luz sus secretos: un mecanismo 
cuyo poder, suministrado por las almas 
de los perecidos en su interior pt>r los 
siglos de los siglos, era suficiente para 
que, en los mapas del sistema solar, 
hubiera que borrar un planeta llamado 
TIERRA. La suerte parecía echada; 
pero Vick XIII, orgulloso hasta la 
gorra, con esa rabia propia del ganador 
nato, exclamó con desgarrada expre- 
sión: -"¡Maldito edificio, te destruiré, 
y haré que toda tu energía se te 
indigeste, hasta vomitarla por comple- 
to!" Y así es como nuestro aventurero 
partió hacia ella. No podía volverse 
atrás, o el destino de la humanidad 
sería trágico. Ante él quedaban 60 
cerrojos que tendría que abrir, uno a 




uno, al precio que fuera, hasta llegar a 
la gran pirámide, la causante de todos 
los males. Y desconectar el interruptor 
que volvería a dejar las cosas en su 
sitio. Sin duda, todo un reto a la 
habilidad, astucia y sangre fría propias 
de un aguzado genio como tú, lector. 

¿MINERO 0 EXPLORADOR? 

Con lo dicho hasta ahora podría ser 
suficiente para que todos vosotros 
supiérais ya, más o menos, cuál es el 
funcionamiento de este estupendo pro- 
grama. Sin embargo los que vayáis un 

I)oco despistados podéis tomar nota de 
o siguiente: el juego completo consta 
de 60 niveles, cada uno de los cuales es 
una pirámide más en nuestro camino 
hacia EL GIZA. En cada una de ellas 
hallaremos un número determinado de 
tesoros, que constituyen el "reclamo" 
utilizado por la gran pirámide para 
atraerte a sus entrañas. Si logras salir 
con vida de una de las pirámides se te 
permitirá engrosar tu cuenta bancaria, 
además de tu lista de éxitos. Una vez 
recogidos todos los tesoros el cerrojo 
de la puerta de salida se desbloquea y 
nos permite pasar al nivel siguiente. 
Pero no creáis que basta con llegar y 
¡hala! a recoger tesoros. 

Lejos de semejante realidad, la es- 
tructura de la pirámide resulta de lo 




más compleja y enrevesada, hallándose 
los tesoros encerrados en cámaras, en 
lo alto de un bloque, en un saliente 
perdido. Así, resulta casi imposible 
para muchos de ellos su acceso directo. 
No obstante siempre llevamos a mano 
nuestro tesoro particular, constituido 
por todo un ejército de herramientas 
que nos permiten perforar en ciertos 
tipos de pared, aunque con algunas 
limitaciones. 

Para empezar, existen dos tipos de 
pared, una rompible y otra no; sola- 
mente la primera puede ser perforada 
con nuestros útiles, obligándonos con 
la segunda a pasar forzosamente por 
algún hueco ya existente. Para conti- 
nuar, la utilización de nuestros útiles 
no es eterna, sino que, tras hacer uso de 
uno de los mismos se esfumará de 
nuestras manos. Este es uno de los 
detalles que más difícil hacen el juego, 
ya que todos los niveles se pasan de 
una única forma. Cualquier torpeza 
cometida por nuestra parte supondrá 
nuestra perdición. Y todas las herra- 
mientas serán las justas y necesarias 
para abrir los hue- 
cos oportunos. Por 
ello habrá que pen- 
sar muy bien qué 
vamos a hacer, 
dónde vamos a pi- 
car, qué ocurrirá 
una vez esté he- 
cho el agujero, 
etc. A veces no será 
necesario perforar allí donde creíamos 
conveniente. En fin, toda una serie de 
combinaciones que hacen el juego sea 
realmente difícil. Por cierto, que casi se 
nos olvidaba con toda esta parrafada, 
deciros cuáles son estos útiles; 

-Pico: Excava dos secciones del sue- 
lo. 

-Pala: Excava una sección del suelo. 

-Perforadora: Rompe dos secciones 
de la pared. 

-Martillo: Perfora una sección de la 
pared. 

Como veis, las notas más relevantes 
son, en primer lugar, el incremento del 
número de herramientas de una (el 
viejo pico de la primera versión) a 
cuatro, ya que ahora no sólo podremos 
excavar en el suelo, sino también perfo- 
rar en un lado de la pared y n< 



Aquí va una lista con todos los 
enemigos y algunas de sus característi- 
cas: 

-SLOUMAN, la momia blanca: sale 
del sarcófago, donde se encontraba 
durmiendo el sueño eterno, hasta que 
algún gracioso la llamó. Por suerte, 
todos sus movimientos se limitan a 
desplazarse horizontalmente hasta en- 
contrar un tope, o caerse por algún 
agujero, hasta desparecer. No puede 
subir las escaleras y se le puede saltar. 

-FLOUMAN, la momia amarilla: 
pariente cercano de la anterior, igual en 
forma pero de color amarillo. Esta 
auténtica atleta sale también del sarcó- 
fago, y no parará de correr en nuestra 
búsca hasta darnos caza. Es una aficio- 
nada a las encerronas y a subir las 
escaleras en "sprint". Se le puede saltar, 
pero a costa de que algún observador 
exclame: "¡Vaya bollo!" 

-PIONCY: esta extraña momia que 
nada tiene que ver con las anteriores 
recuerda un tanto en su aspecto los 
jueces del siglo XVIII (que se ponían 






aquellas gigantescas y feísimas pelucas 
con tres rulos a los lados, infectadas de 
piojos). No sale de ningún sarcófago, 
sino de una diminuta neblina amarilla 
que aparece donde menos lo esperas^ y 
comienza a saltar y saltar sin parar. Por 
ello, su desplazamiento es más lento, 
pero los desniveles no son un proble- 
ma, ya que todo lo que nosotros 
podamos saltar lo puede hacer ella. En 
caso de encerrona se le puede superar 
por debajo en alguno de sus saltos. 

-ROCK ROLL: este habitante de 
las pirámides es una bola de granito 
puro que se desplaza rodando hacia 
donde nos encontremos. Un obstáculo 
o caída por algún agujero lo detienen. 
En movimiento es muy peligroso, ya 

3ue no se le puede destruir, tan solo 
etener de un certero disparo. 
Para defendernos de este ejército, 
disponemos del mismo cuchillo que en 
la primera parte, que una vez lanzado 
no se detendrá hasta impactar con un 
enemigo, aunque lo hayamos perdido. 
Y, como novedad, un boomerang, con 
su típico movimiento, que una vez 
lanzado no llega tan lejos, pero tene- 
mos la seguridad de que volverá a 
nuestras manos. 



Y no acaba ahí la cosa, porque 
además de los enemigos móviles, en 
todo el desarrollo tendremos que supe- 
rar puentes y escaleras que se desvane- 
cen tras haberlos usado un par de 
veces, y falsos muros que aparecen de 
la nada para bloquear un camino que 
antes teníamos libre. 

OPCION EDIT 

Para redondear un programa de tales 
características, los programadores nos 
ofrecen la posibilidad de que seamos 
nosotros mismos los que diseñamos 
pantallas de juego. Esto lo podemos 
realizar mediante la opción EDIT, y el 
proceso es sumamente sencillo. 

Inicialmente apa- 
recerán unos menús 
puramente de segu 
ridad para determi 
nar si realmente 
queríamos diseñar 
o nos hemos equi 
vocado. A conti- 
nuación aparecerá 
una cuadrícula y 
una mano con la que debemos seleccio- 
nar el número de pantallas que quera- 
mos tenga el nivel (hasta un máximo de 
seis), y la disposición de éstas. La 
manera en que se comunicarán es 
automática. Una vez configurado el 
diseño, pulsamos RETORNO para 
aceptarlo y aparecerá otro menú en el 

Sue se nos dan a elegir todos los 
ementos del juego. Mediante los cur- 
sores y SPACE seleccionamos el ele- 
mento deseado. Pulsamos RETURN y 
aparecerá un fondo negro. Sobre él 
deberemos ir construyendo cada sub- 
pantalla. Pulsamos SPACE y en el 
lugar donde esté la flecha aparecerá el 
elemento seleccionado anteriormente. 
Si nos equivocamos podemos utilizar 
la tecla M para borrarlo. Cuando 
queramos dejar este elemento y pasar a 
colocar otro, pulsamos RETURN y 
nuevamente aparecerá el menú ante- 
rior. Este proceso lo iremos repitiendo 
hasta finalizar la pantalla. Hay que 
tener presente que en cada pantalla es 
imprescindible un jugador y una puer- 
ta de salida, y que algunos elementos 
tienen un número limitado que se 
reflejará si intentáis superarlo. 
Continua en la pág. 35 
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RUTINAS DE CODIGO MAQUINA 




El BIOS (Basic Input Output System) se encuen- 
tra en la ROM de tu ordenador. Consiste en una se- 
rie de rutinas, escritas en código máquina, capaces 
de gestionar cosas tan dispares como el teclado, la 
pantalla, el interfaz de la impresora y el del casset- 
te, los puertos de los joystick y las ranuras de los 
cartuchos. 

Cualquiera que disponga de un desensamblador 
habrá comprobado que las posiciones de memoria 
más bajas de la ROM contienen una serie de saltos 
absolutos hacia diferentes direcciones (JP direc- 
ción). Quizá os hayáis preguntado por qué se des- 
perdicia asi tal cantidad de memoria (tres bytes 



para cada rutina), ya que sería igual referirse a la 
posición final, en lugar de pasar por un salto abso- 
luto. Pues bien, esto es en orden a asegurar total- 
mente la compatibilidad de los diferentes ordenado- 
res MSX, así como de sus futuras mejoras y versio- 
nes. Microsoft, la firma creadora del standard, dictó 
unas normas a seguir por todos los programadores, 
que deben ser estrictamente respetadas para que 
cualquier diferencia en el hardware no repercuta 
en el funcionamiento del solfware. Unos ejemplos 
aclararán mejor este punto. Supon que quieres es- 
cribir un dato en el cassette, poner en marcha el 
motor, encender el diodo de las mayúsculas o, sim- 
plemente, sacar un carácter por la pantalla. En 
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EL BIOS 




cualquiera de estos casos hay una forma directa de 
obtener el resultado de entrada/salida. No obstante, 
el mínimo cambio en la asignación comportaría 
que el ordenador mostrara unos resultados com- 
pletamente inesperados. 




Todo lo anterior conduce a la necesidad de acce- 
der a las rutinas del BIOS en lugar de improvisar 
soluciones de compromiso. Dicho esto, se aprecia 
claramente la importancia de contar con un mapa 
de la ROM que dé información de la ubicación y con- 
tenido de las rutinas fundamentales. A continua- 
ción se detallan, añadiendo, en las mas interesan- 
tes, una relación de los parámetros de entrada ne- 
cesarios en cada caso, así como de las modificacio- 
nes que efectúan en los registros y en las posiciones 
de memoria. 

Sin duda encontraréis inestimable la ayuda que 
os brindan las rutinas del BIOS. Desde aquí, el deseo 
de una fructífera programación. 



LAS RUTINAS DEL BIOS 



Posición: &HO 

Esta rutina no necesita parámetros de entrada ni 
tampoco ofrece ninguno a la salida. Puede ser ejecu- 
tada utilizando un restart (RST O). Su función es la 
de inicializar el ordenador. Por consiguiente, se lla- 
ma cuando se quiere empezar de nuevo, cuando se 
pulsa el botón de reset o, automáticamente, al en- 
cender el aparato. 

Posición 6*H8 y &H10 

Estas rutinas son utilizadas por el intérprete BA- 
SIC para analizar los errores de sintaxis, tomar el 
siguiente carácter o token del programa, etc. Son de 
poca utilidad, aunque una posible aplicación seria 
la de construir un BASIC extendido. 

Posición: G*HC 

Se usa para leer una dirección de memoria de un 
cartucho determinado. El número de cartucho ha 
de colocarse en el acumulador y la dirección en el 
registro HL. Altera AF, BC y DE. 

Posición: &H14 

Igual que la anterior pero para escribir. 
Posición: &H18 

Es, sin duda, una rutina muy útil. Puede ser lla- 
mada con RST 18. Se encargará de sacar el carácter 
contenido en el acumulador al periférico seleccio- 
nado. Si la posición de memoria 6?HF416 contiene 
un cero, la salida será a la pantalla. Si GPHF416 es 
distinto de cero, la salida será por impresora. Por 
último, tienes la posibilidad de escribir en un fiche- 
ro de disco, cargando SPHF864 con la dirección de 
memoria de dicho fichero, que señalará el dato a 
mandar. RST 18 no modifica ningún registro. Por 
otra parte, realiza una llamada al gancho situado 
en 6?HFEE4 después de guardar el par AF en la pila. 
Como puedes intuir, poner un parche en esa direc- 
ción te dará la oportunidad de controlar los distin- 
tos periféricos a tu antojo. 

Posición: 6*H1C 

Esta rutina se emplea para ejecutar una subruti- 
na de un cartucho. 
Posición: 6*H20 

Puedes comparar los registros DE y HL llamando 
"a esta rutina. Aquí tienes su listado: 
LD A, D 

CP H 
RET NZ 
LD A, E 

CP L 
RET 

Posición: 6*H84 

Esta rutina selecciona una página de un cartu- 
cho. 
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350 PUT SPRITE 



Posición 6-H28 

Es empleada por el Intérprete BASIC para cono- 
cer el tipo de variable que se está utilizando. Alter- 
nativamente se puede leer la dirección &HF663, 
puesto que siempre se almacena aquí el número de 
bytes de la variable usada; es decir; dos para las va- 
riables numéricas enteras, cuatro para las de preci- 
sión sencilla, ocho para las de doble precisión y tres 
para las cadenas alfanuméricas. Sin embargo, no es 
seguro que esta dirección se respete en ftituras ver- 
siones. Por tanto observa si el flag C está a 0 (tipo 
8), el flag M está a 1 (tipo 2), el flag Z está a 1 (tipo 
3) o el flag P se encuentra a 0 (tipo 4). 

Posición &H30 

Ejecuta una rutina contenida en un cartucho. El 
byte siguiente al RST 30 debe contener el identifica- 
dor del cartucho y después debe colocarse la direc- 
ción de llamada. 

Posición 6»H38 

Esta rutina es ejecutada 50 veces por segundo, 
salvo que las interrupciones estén desactivadas. Lo 
primero que hace es guardar los registros en la pila 
(incluidos los alternativos y los de índice), por lo 
que podrás emplearlos todos libremente y sin res- 
tricciones. Si pones un parche en la dirección 
SPHFD9A forzarás al sistema operativo a ejecutar 
una de tus rutinas siempre que se produzca una in- 
terrupción. Como puedes ver, esto te da un poder in- 
menso sobre el ordenador. No modifica ningún re- 
gistro, pero altera muchas posiciones de memoria, 
ya que actualiza, entre otras, la variable TIME y las 
escalas musicales. Asimismo, comprueba las coli- 
siones de los SPRITES, el teclado, etc. 

Posición: &H41 

Llamándola haces que la pantalla se desconecte. 
No obstante, todo lo que escribas se conservará y 
podrás visualizarlo con la siguiente rutina. Suele 
ser útil cuando se hace un dibujo muy complicado 
que se quiere mostrar en pantalla instantáneamen- 
te. Modifica los pares AF y BC. 

Posición: 6*H44 

Esta rutina activa la pantalla, por lo que comple- 
menta a la anterior. Al igual que aquélla, modifica 
los registros AF y BC. 

Posición: 6*H47 

Se llama a esta rutina para escribir en uno de los 
registros de estado del procesador de vídeo (VDP). 
En C debe ponerse el número de registro a escribir y 
en B el dato en cuestión. Su equivalente en BASIC se- 
ria: VDP(C)=B. Es importante emplear esta rutina, 
en lugar de acceder al VDP directamente, puesto 
que se encarga de guardar una copia del registro de 
estado en la RAM del sistema, desde la posición 
SPHF3DF hasta la 6?HF3E6. Ten presente que estos 
registros sólo son de escritura y no podrías com- 
probar los datos una vez mandados. Modifica los 



pares AF y BC. 
Posición &H4A 

Funciona igual que la instrucción VPEEK del BA- 
SIC. Debes cargar la dirección de la RAM de vídeo en 
el par HL y obtendrás a la salida el resultado en el 
acumulador. Modifica sólo AF. 

Posición: 6»H4D 

Es idéntica a la anterior sólo que ésta actúa como 
VPOKE. El dato a escribir ha de ponerse en el acu- 
mulador. 

Posición: 6*HB0 

Dispone el VDP para una operación de lectura. Es 
mejor pasarla por alto y llamar directamente a la 
rutina situada en GPH59. 

Posición: 6*H83 

Prepara el VDP para una operación de escritura. 
Al igual que la anterior es mejor olvidarla y acceder 
a la rutina colocada en 6?H5C. 

Posición: &HB6 

Esta rutina llena la RAM de vídeo de un mismo 
valor contenido en el acumulador. La posición de 
origen debe encontrarse en HL y la longitud del blo- 
que en BC. Modifica los pares AF y BC. La utilidad de 
esta rutina es colorear la pantalla rápidamente. 
Las instrucciones CLS, COLOR, LINE y PAINT la em- 
plean. 

Posición: 6*H59 

Esta rutina traslada un bloque de la RAM del VDP 
hacia la memoria central. La longitud del referido 
bloque ha de encontrarse en BC, el destino en DE y el 
origen en HL. Modifica AF, BC y DE. Tarde o tempra- 
no todos los programadores han de encontrarse 
con esta rutina, por lo que su uso es prácticamente 
imprescindible. 

Posición: 6*H8C 

La rutina situada en esta dirección tiene un com- 
portamiento análogo a la anterior, con la diferencia 
de que traslada un bloque desde la memoria central 
a la RAM de vídeo. 

Posición: 6*H8F 

Esta llamada pone al VDP en uno de los cuatro 
modos de pantalla. El acumulador deberá contener 
el modo seleccionado. Su equivalente en BASIC se- 
ría SCREEN A. No inicializa los SPRITES. Modifica 
todos los registros así como las posiciones de me- 
moria S?HF3B0, GPHF922, STHF924, fifHFCAF y 
SPHFCBO. 

Posición: 6»H6& 

Esta rutina cambia el color de la pantalla, toman- 
do como nuevos valores las posiciones de memoria 
siguiente: S?HF3E9 (color de la tinta), 6PHF3EA 
(color del papel) y 6?HF3EB (color del borde). Modi- 
fica los pares AF, BC y HL. 

Posición: &H69 

Su cometido es inicializar todos los SPRITES. Al- 
tera todos los registros. 
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ción en la que se encuentre el cursor, aunque se tra- 
te de un código de control. Actualiza la pantalla, 
desplazándola o haciendo un cambio de línea si es 
preciso. Después de apilar todos los registros salta 
al gancho situado en SPHFDA4. No modifica ningún 
registro pero sí las coordenadas Y y X del cursor 
(almacenadas en 6?HF3DC y 6PHF3DD respectiva- 
mente) y la dirección 6PHF661. 
Posición: &HA5 

Envía el carácter contenido en el acumulador a la 
impresora, esperando hasta que ésta esté prepara- 
da. Si se pulsa CTEL-STOP el flag C se pondrá a 1. No 
modifica ningún registro. 

Posición: &HA8 

Esta rutina es llamada por la anterior. Su finali- 
dad es comprobar si la impresora está ON-LINE. De 
no ser así el flag Z se pondrá a 1 . Modifica el par AF. 

Posición: &HAB 

Transforma el código contenido en el acumula- 
dor en un carácter gráfico (si es menor que 32), en 
la forma que el VDP está preparado para aceptar. 
Prueba con VPOKE 0,1 y entenderás perfectamente 
el funcionamiento de esta rutina. Modifica el par 
AF. 

Posición: frHAE 

Acepta una línea completa del teclado. Puesto que 
una línea puede contener hasta 255 caracteres, 
ésta se almacena en buffer de entrada que está si- 
tuado entre las posiciones 5PHF55E y 6PHF65D. Ala 
salida, el par HL apunta al inicio de este buffer me- 
nos uno. Modifica todos los registros. 

Posición: &HB1 

Esta rutina es similar a la anterior. Aceptará la 
entrada de caracteres e irá mostrándolos en la pan- 
talla hasta que se pulse RETURN o CTRL-STOP. Mo- 
difica todos los registros. 

Posición: &HB4 

Esta rutina actúa de forma idéntica a las anterio- 
res, pero visualizando antes el signo de interroga- 
ción característico de los INPUT. 

Posición: 6»HB7 

Sirve para comprobar si se ha pulsado CTRL- 
STOP. Si esto es así, el flag C se pondrá a 1. Modifica 
AF. 

Posición: &HBA 

Esta rutina complementa a la anterior, pero ade- 
más analiza si se ha pulsado únicamente la tecla 
STOP, para detener la ejecución del programa cuan- 
do así sea. Alt era el par AF. 

Posición &HBD 

Esta rutina hace exactamente lo mismo que la 
anterior, pero empleando más tiempo. 
Posición: &HCO 

Produce un BEEP e inicializa el PSG, llamando a 
la rutina situada en & H90. Modifica todos los regis- 
tros. Su equivalente en BASIC sería: BEEP. 



Posición: &HC3 

Su cometido es borrar la pantalla, con la condi- 
ción de que pongas el flag Z a 0 antes de llamarla. 
Modifica los pares AF, BC y DE y las posiciones de la 
RAM del sistema relacionadas con el cursor. El 
modo de pantalla que se esté utilizando es indife- 
rente. 

Posición: &HC6 1 

Sitúa el cursor en la posición especificada por el 
registro HL, para lo cual es necesario poner la co- 
lumna en H y la fila en L. Altera el par AF y las direc- 
ciones de memoria encargadas de guardar las coor- 
denadas de cursor ( 6PHF3DC y OT3DD). Su equiva- 
lente en BASIC sería: LOCATE L, H. 

Posición: &HC9 

Esta rutina es llamada por el intérprete BASIC 
para saber si las teclas de función están activas. 
Posición: &HCC 

Se llama a esta rutina para desconectar la visua- 
lización de las teclas de función. Su equivalente en 
BASIC sería: KEYOFF. Altera AF, BC y DE. 

Posición: 6»HCF 

Puede utilizarse para mostrar el contenido de las 
teclas de función en la pantalla. Actúa como la ins- 
trucción BASIC KEYON. Modifica los registros AF, 
BC y DE, así como la posición fi?HF3DE, que será 
cargada con GPHFF. 

Posición: &HD2 

Esta rutina se emplea para cambiar de pantalla y 
ponerla en el otro modo de texto. 
Posición: &HD8 

Esta llamada realiza una función idéntica a la 
instrucción BASIC A=STICK(A), por lo que te su- 
giero que leas el manual de tu ordenador para cono- 
cer los detalles. Modifica todos los registros. 

Posición: &HD8 

Analiza el estado del disparador especificado por 
un número que debe cargarse en el acumulador. A 
la salida, tendrás un cero en el registro A, si ha ha- 
bido algún disparo, o 255, si no se ha pulsado el dis- 
parador. Modifica AF. 

Posición: &HDB 

Esta rutina funciona de forma análoga a la ins- 
trucción BASIC PAD (A). Por consiguiente, te acon- 
sejo que mires allí para obtener una información | 
completa. Altera todos los registros. 

Posición: &HDE 

Esta rutina lee la raqueta de juegos especificada 
por el registro A Asimismo, devuelve en el acumu- 
lador un parámetro comprendido entre Oy 256, re- 
ferido a la posición actual. Modifica todos los regis- 
tros. 

Posición: &HE1 

Con esta llamada pondrás el motor del cassette 
en marcha y podrás leer la cabecera. Si se pulsa 
CTRL-STOP el flag C se pondrá a 1. Modifica todos 
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Posición: &H6C 

Esta rutina actúa como la instrucción BASIC 
SCREEN O. Modifica todos los registros así como las 
posiciones de memoria que van desde la GPHF3DF a 
la SPHF3E5. 

Posición: 6*H6F 

Funciona igual que la anterior pero para el 
SCREEN 1. 
Posición: &H72 

Igual que las anteriores pero para SCREEN 2. 
Posición: &H78 
Igual para SCREEN 3. 
Posición &H78 

Inicializa al VDP para trabajar en SCREEN 0, 
pero sin tocar la RAM de vídeo. Modifica los mismos 
registros y posiciones de memoria que la rutina si- 
tuada en SPH6C. 

Posición: &H7B 

Trabaj a igual que la anterior pero para SCREEN 1 . 
Posición G*H7E 

Igual que las anteriores pero para SCREEN 2. 

Posición: 6*H81 

Lo mismo para SCREEN 3. 

Posición: &H87 

Con esta rutina sólo tendrás que cargar un núme- 
ro de SPRITE en el acumulador para que te devuelva 
la dirección de la VRAM en la que se encuentran los 
atributos del SPRITE seleccionado, gracias al regis- 
tro HL. Modifica los pares HL y DE así como los 
fiags. 
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Posición: &H&A 

Esta rutina te informará del tipo de SPRITE que 
estás empleando, o mejor dicho: el número de bytes 
que emplea cada uno de éstos, que pueden ser 8 ó 32. 
Por tanto, a la salida tendrás en el acumulador una 
de estas dos cantidades. Además el carry se pondrá 
a 1 si los SPRITES son del tipo ampliado. Unicamen- 
te modifica el par AF. 

Posición: 6*H8D 

Esta rutina escribe el carácter contenido en el 
acumulador en la dirección especificada por el cur- 
sor gráfico (la coordenada X está en 6PHFCB3 y la Y 
en S?HFCB4), siempre y cuando estés trabajando en 
SCREEN 2. Sólo modifica las posiciones de memoria 
6PHF92A, 6PHF923 y SPHF92C. 

Posición: 6-H90 

Esta rutina inicializa el Generador Programable 
de Sonido. No modifica ningún registro, pero altera 
toda el área de la cola del sonido, que empieza en 
6PHF975 y termina en GPHFA74. 

Posición: 6*H93 

Con ella puedes escribir en uno de los registros 
del PSG. El número de registro ha de colocarse en el 
acumulador y en E el dato a mandar (comprendido 
entre 0 y 13). Su equivalente en BASIC sería: 
SOUND A, E. Esta llamada no modifica ningún re- 
gistro. 

Posición: 6»H96 

Esta rutina sirve para leer un registro del PSG. El 
acumulador debe contener el número de registro 
(comprendido en 0 y 13). Sólo altera el contenido 
de A. 

Posición: 6-H99 

Se llama a esta rutina para ejecutar la escala mu- 
sical (caso de haberla). Si en el buffer de sonido no 
hay ninguna escala escrita el acumulador se carga- 
rá con un cero. Modifica los pares AFy HL, así como 
las posiciones de memoria 6?HFB3F y d?HFB40. 

Posición: &H9C 

Comprueba si las teclas de función están activas 
en la pantalla. En caso afirmativo, analiza las teclas 
SHIFT, para mostrar el contenido de las funciones 
F6 y FIO, si están pulsadas. Esta rutina pondrá el 
flag Z a 1 si no hay ninguna tecla apretada. Unica- 
mente modifica AF. 

Posición: 6»H9F 

Esta rutina es de gran importancia. Su cometido 
es coger un carácter del buffer del teclado. Si este 
buffer está vacío enseñará el cursor y esperará has- 
ta que se pulse una tecla. A la salida, el acumulador 
contendrá el código del carácter. Asimismo, realiza 
una llamada al gancho situado en fif HFDC2 después 
de apilar los pares HL, DE y BC. No modifica ningún 
registro. 

Posición: &HA2 

Imprime el carácter del acumulador en la posi- 





los registros. 

Posición: &HE4 

Se emplea para leer un byte de la cinta, que será 
devuelto en el acumulador. Al igual que la rutina 
anterior, el carry se encenderá si la operación es 
abortada. Modifica todos los registros. 

Posición: &H257 

Esta rutina sirve para detener la operación de 
lectura del cassette. No altera ningún registro. 
Posición: frHEA 

Esta rutina pone el motor del cassette en marcha 
y escribe la cabecera en la cinta. El carry se pondrá 
a 1 si se interrumpe la escritura. Modifica todos los 
registros. 

Posición: &HED 

Carga el acumulador con un dato y esta rutina te 
lo escribirá en la cinta. Como siempre el carry en- 
cendido te indicará si la operación fue abortada por 
la pulsación de CTRL-STOP. Modifica todos los re- 
gistros. 

Posición: 6*HF3 

Esta rutina conectará el motor del cassette, si el 
acumulador contiene un 1, o lo parará, si contiene 
un 0. Por otra parte, si cargas el registro A con 
6PHFF, antes de llamarla, invertirás el estado del 
motor. 

Posición: &HFC 

Esta rutina desplaza al cursor gráfico un punto 
hacia la derecha. Al llamarla, la posición 6?HF92Ay 
siguiente debe contener la dirección de la VRAM en 
la que se encuentra el punto. Asimismo, deberás po- 



ner la en posición SPHF92C un valor cuyo único bit 
encendido muestre el punto a tratar. Por consi- 
guiente si 6PHF92C contiene un 32 (GPBOOOOIOOO) 
el cursor gráfico señalará al tercer punto de la posi- 
ción especificada por 6PHF92A, al volver de la ruti- 
na. Modifica el par AF y las tres posiciones de me- 
moria antes referidas. 
Posición: V &HFF 

Esta rutina hace exactamente lo mismo que la 
anterior, sólo que el cursor gráfico se desplaza un 
punto a la izquierda. 

Posición: &H102 

Hace lo mismo que las anteriores pero despla- 
zando el cursor hacia arriba. 
Posición: 6»H108 

Trabaja igual que la rutina anterior pero pone el 
carry a 1 si se alcanza la fila superior de la pantalla. 
Posición: &H108 

Se comporta como GfHFC pero bajando un punto 
el cursor gráfico. 
Posición: &H10B 

También hace bajar un punto el cursor gráfico, 
aunque pondrá el carry a 1 si se llega a la fila infe- 
rior de la pantalla. El resto como GfHFC. 

Posición: &H11D 

Esta rutina devuelve en el acumulador el código 
de color del punto señalado por las posiciones de 
memoria GPHF92A a GPHF92C (ver la rutina situada 
en SfHFC). 

Posición: 6»H183 

Esta rutina traza una línea hacia la derecha a 
partir de la posición especificada por las direccio- 
nes SPHF92A a 6PHF92C (ver la rutina situada en 
GPHFC) y la longitud contenida en HL. El color del 
trazo ha de colocarse en GfHF3F2. Modifica todos 
los registros. 

Posición: &H132 

Usando esta rutina actuarás directamente sobre 
el diodo de las mayúsculas. Así, si el acumulador 
contiene un cero lo encenderás, con otro valor, lo 
apagarás. Modifica el par AF. 

Posición: &H141 

Esta rutina comprueba el estado de la matriz del 
teclado. Dicha matriz forma un cuadrado de 8 x 8. El 
acumulador deberá contener el número de la fila a 
explotar. A la salida tendrás que A tiene un 255, si 
no ha sido pulsada ninguna tecla de la fila en cues- 
tión, o un bit puesto a cero, indicando la tecla que sí 
se ha pulsado. Unicamente altera el par AF y no es- 
pera hasta que se pulsa una tecla. 

Posición: 6*186 

Sirve para borrar completamente el buffer del te- 
clado. Modifica el registro HL. 

Nota: Las posiciones de la ROM 6 y 7 contienen 
los números de los puertos asignados para las ope- 
raciones de entrada/salida al VDP. 
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TABLAS VARIABLES 
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VARIABLES ROM 
DEL SISTEMA 



teclado 

ENTRADA A: dirección de la fila 
8ALIDA A: estado de la fila 



MODIFICA AF 
0156 Borrar buffer de teclado 
MODIFICA HL 



FUNCION 
003E Inicial izar teclas funcionales. 

MODIFICA Todos los registros. 
004A Leer datos de la VRAM 

ENTRADA HL: dirección VRAM 

SALIDA A: datos 

MODIFICA AF 
004D Escribir datos en la VRAM 

ENTRADA HL: dirección VRAM 
A: datos 

MODIFICA AF 
0056 Introducir una constante en la 

VRAM 

ENTRADA BC: longitud 

HL: dirección VRAM 

A: datos 
MODIFICA AF, BC 
0059 Transferir un bloque de la memoria 
principal a la VRAM 
ENTRADA BC: longitud 

DE: dirección RAM de 

destino 

HL: dirección VRAM de 
origen 

MODLFICA Todos los datos 
005C Transferir un bloque de la memoria 
principal a la VRAM 
ENTRADA BC: longitud 

DE: dirección VRAM de 

destino 

HL: dirección RAM de 
origen 

MODIFICA Todos los registros 
0090 Inicial Izar el generador 

programable de sonidos (PSG) 

MODIFICA Todos los registros 
0093 Escribir datos en el PSG 

ENTRADA A; n.° del registro 
0096 Leer datos del PSG 

ENTRADA A: n.° de registro 

SALIDA A: datos 

MODIFICA A 
009C Verificar buffer de teclado 

SALIDA Cero (flag) si el buffer está 

vacio 

009F Esperar una entrada de teclado 
SALIDA A: el carácter 
MODLFICA AF 

00D5 Examinar estado deljoystick 
ENTRADA A: stick ID (0-2) 
SALLDA A: stick status ( 0-8 ) 
MODLFICA Todos los registros 

00D8 Examinar disparador 

ENTRADA A: disparador ID (0-4) 
SALIDA A: 255 si está pulsado 
MODIFICA AF 

0141 Obtener el estado de la matriz del 
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TABLAS VARIABLES 




H. VARIABLES RAM DEL SISTEMA 



FUNCION 

F380 rutina para leer la ranura primaria 
F385 rutina para escribir en la ranura 
primaria 

F38C llamar rutina de la ranura primaria 

F39A dirección inicial para USRO-9 

F3AE longitud de línea = 39 

F3AF lontitud de línea = 31 

F3B0 longitud de línea 

F3B1 líneas en pantalla = 24 

F3B2 espacio de columna = 14 

F3B3 SCREEN 0 tabla de nombres 

F3B5 tabla de colores 

F3B7 forma de carácter 

F3B9 atributo 

F3BB sprite 

F3BD SCREEN 1 tabla de nombres 

F3BF tabla de colores 

F3C 1 forma de carácter 

F3C3 atributo 

F3C5 sprite 

F3C7 SCREEN 2 tabla de nombres 

F3C9 tabla de colores 

F3CB forma de carácter 

F3CD atributo 

F3CF sprite 

F3D1 SCREEN 3 Tabla de nombres 

F3D3 tabla de colores 

F3D5 forma de carácter 

F3D7 atributo 

F3D9 sprite 

F3DB enganche de tecla 

F3DC coord. Y cursor 

F3DD coord. X cursor 

F3DE teclas funcionales 

F3DF contenido del registro VDP 

F3E7 = 0 

F3E8 = (FF) 

F3E9 color de primer plano 

F3EA color de fondo 

F3EB color de borde 

F3EC salto 0 

F3EF salto 0 

F3F2 byte atributo 

F3F3 dirección de tabla de espera 

F3F5 = (FF) 

F3F6 sincronización de exploración de 

teclas 
F3F7 = 50 

F3F8 (put)buffer teclado 
F3FA (get) buffer teclado 
F3FC parámetros de E/S cassette 
F40F puntero de RESUME TEXT 
F414 código de error 
F415 cabeza impresora 
F416 salida impresora 
F417 0 = para impresora MSX 
F4 1 8 distinto de cero para salida de 
caracteres sin procesar 



F419 función val 

F41C línea cursor 

F41F buffer de proceso 

F55D coma para INPUT 

F55E buffer de entrada de teclado 

F660 fin de buffer 

F661 posición terminal 

F662 flag de matriz 

F663 Upo de valor 

F664 tipo de operador 

F665 para proceso 

F666 puntero de texto para getchr 

F668 forma interna de la constante 

posterior a getchr 
F669 tipo de constante 
F672 parte superior de la memoria 
F674 parte superior de la pila 
F676 parte superior del texto 
F678 descripción temporal 
F67A almacenar descripciones 

temporales 
F698 descripción de cadena después de 

operaciones 
F69B parte superior posible del espacio 

de cadenas 
F68D para operaciones de reorganización 

de datos 
F6A1 puntero de sentencia FOR 
F6A3 puntero de sentencia DATA 
F6A5 flag para FOR YUSR 
F6A6 flag para INPUT Y READ 
F6A7 para sentencias 
F6A9 = 0 cuando no hay línea de 

programa 
F6AA = 0 en modo AUTO 
F6AD incremento en AUTO 
F6AF puntero de texto para RESUME 
F6B 1 grabar pila para proceso de errores 
F6B3 línea de error 
F6B5 línea de curso 
F6B7 puntero de texto para RESUME 
F6B9 línea de proceso de errores 
F6BB = 1 si se está procesando un error 
F6BC tareas temporales 
F6B6 antiguo n.° de línea establecido por 

CRTLSTOP, STOP Y END 
F6C0 antiguo puntero de texto 
F6C2 dirección inicial de variables 

simples 

F6C4 dirección inicial de matrices 

F6C6 fin de la memoria utilizada 

F6C8 puntero DATA 

F6CA tipo de variable para A-Z 

F6E4 pila usada en labores de recogida de 

basura 
F6E6 longitud de tabla 
F6E8 tablas de parámetros para 

funciones definidas para el usuario 
F74C puntero de bloqueo de parámetros 
F74E longitud del bloqueo de parámetros 
F750 direcciones de los parámetros 



F7B4 flag para búsqueda de parámetros 

F7B5 fin de búsqueda 

F7B7 = 0 si no corresponde función 

F7BA uso temporal en recogida de basura 

F7BC parauso de intercambios 

F7C4 = 0 para rastreo desactivado 

F7C5 = zona de trabajo para rutinas de 

paquetes BCD 
F83F = zona de datos para manipulación 

de ficheros 
F87F contenido de teclas funcionales 
F91F tablas de VRAM BASE 
F92A para GENGRP 
F931 zona de trabajo y CIRCLE 
F949 zona de trabajo de PAINT 
F956 zona de trabajo de PLAY 
FBBO posible recalentamiento si es 

distinto de cero 
FBB1 distinto de cero si el texto BASIC 

está en ROM 
FBB2 tabla de te rmin adores de linea 
FBCA primera posición de carácter en 

INLIN 
FBCC código para cursor 
FBCD flag para teclas funcionales 
FBCE flags para interruptores 

condicionales por teclas de función 
FBD8 flag de condición 
FBD9 flag de enganche 
FBD A antiguo estado de tecla 
FBE5 nuevo estado de tecla 
FBFO buffer de código de tecla 
FC 1 8 operaciones de proceso de pantalla 
FC40 operación de pattern converter 
FC48 parte inferior de la RAM 
FC4A parte superior de la memoria 
FC4C tabla de interrupción 
FC9A RTYCNT 
FC9B INTFLG 
FC9C PADX 
FC9DPADY 
FC9E JIFFY 
FCAO intervalo 
FCA2 contador de intervalo 
FCA4 leer cassette 
FCA6 encabezamiento de carácter gráfico 
FCA7 contador de secuencia de escape 
FCA8 flag de inserción 
FCA9 ON/OFF cursor 
FCAA carácter de cursor 
FCAB estado de la tecla CAPS 
FCAC operaciones de la tecla desactivada 
FCAD no utilizada 

FCAE = 0 mientras se carga un programa 
BASIC 

FCAF modo de pantalla ( screen ) 
FCBO antiguo modo screen 
FCB1 carácter para CAS : 
FCB2 color de borde en PAINT 
FCB3 cursor gráfico, coord. X 
FCB5 cursor gráfico, coord. Y 
FCB7 acumulador gráfico, X 
FCB9 acumulador gráfico, Y 
FCBB flag de DRAW 
FCBC escala en DRAW 
FCBD ángulo de DRAW 
FCBE BLOAD/BSAVE 
FCBF inicio de BSAVE 
FCCI zona de trabajo de ranura 
FD9A enganches 




Viene de la pág. 26 

Ahora sólo falta grabar la pantalla en 
disco o cinta, según dispongáis, y luego 
seleccionar END, con lo que volvere- 
mos al principio del programa. Ahora, 
cuando vayáis a jugar, podréis, si así lo 
deseáis, sentir la satisfacción y el placer 
de saber que estáis jugando con algo 
hecho por vosotros mismos. ¿No os 
parece fantástico? 

TRUCOS Y EXPLICACIONES 

Visto el panorama tal como lo he- 
mos presentado hasta ahora, muchos 
podéis creer que falta auténtico valor 

Eara comenzar esta aventura. Por éso, 
>s más agudos quizá os habéis pregun- 
tado: ¿no se escon- 
derá en éste, como 
en todos los gran- 
des programas de 
KONAMI, algún 
truquito para facili- 
tar la labor?. La 
verdad es que, para 
hacer más fácil el 
recorrido, no. No 
descartamos en un futuro, cuando 
nuestros expertos en el tema hayan 
tenido tiempo para indagar, el ofrece- 
ros algunas claves, que en realidad no 
serían demasiado útiles, ya que este 
programa no resulta más sencillo si 
tenemos vidas infinitas, o continuamos 
con F5 desde el mismo nivel, pues 
muchas veces tendremos que suicidar- 
nos. 

Desde aquí os recomedamos que, si 
aún no habéis avanzado mucho en el 
programa, probéis con cualquier tonte- 
ría que se os ocurra, y a lo mejor, 
claves como ABCDEFGH, o IJKLM- 
NOP, o llenarlo todo de J, os permitan 
acceder a niveles bastante avanzados. 
Pero, yendo a lo que interesaba, os 
diremos que en determinados niveles, 
si saltamos en ciertos sitios, aparecerá 
una mini-pirámide; si colocados en ella 
pulsamos el cursor inferior, accedere- 
mos a dos gratas sorpresas: 

1) Un juego rompecabezas, de esos 
en los que hay que reponer una imagen 
dada originalmente mediante toda una 
serie de piezas móviles, y, desplazán- 
dolas correctamente, llegar al dibujo 
original. 

En esta ocasión se trata de disponer 



los números del 1 al 24 ordenados de 
izquierda a derecha. Si lo conseguimos 
obtendremos tres vidas extras, que en 
absoluto compensan el desgaste extra 
de materia gris que, por si no tuviéra- 
mos bastante de por sí con la pirámide, 
hay que invertir en esto. 

2) Un miniórgano (ya sabéis que a 
los japoneses les va ésto de lo "mini") 
desde el que podremos seleccionar y 
oír todas las melodías y efectos de que 
dispone el jueeo y cuya calidad está 
asegurada si el cartucho dispone del 
SOUND CHIP CREATOR (SCC). 

Un ejemplo. El nivel 7 consta de dos 
pantallas dispuestas verticalmente. En 
la zona superior izquierda de la panta- 
lla inferior se observa un muro que 
cierra el acceso a un puente volátil. Si 
dejándonos caer desde arriba, llegamos 
a ese pequeño hueco y saltamos, apare- 
cerá unas de estas pirámides escondien- 
do el organillo. Pero estad seguros que 
no será ésta, ni mucho menos, la única 
que encontraréis en todo el juego. 

Y para terminar ya, con este comen- 
tario, vamos a intentar poner nuestro 




granito de arena diciéndoos cómo su- 
perar la primera pantalla, para que 
cojáis el hábito del juego, y la última: 

La primera pantalla es sumamente 
fácil. Es unitaria y todo se limita a 
coger el pico, bajar por la escalera para 
llegar a la zona superior derecha y 
destruir un trozo de pared rompible. 
Nos dejamos caer, con lo que cogemos 
la perforadora. Con ella destruimos el 
bloaue inferior que hay junto a la 
escalera, para poder salir, y ya están 
todos los tesoros a nuestro alcance. 

Muy lejos de ésta, a años-luz, la 
pantalla 60 "es otra historia". Y la 
verdad, es que, para ser la última no es 
la más difícil; pero eso sí, larga y 
pesada, de modo que su auténtica 
dificultad radica no va en el recorrido 
en sí, sino en burlar los incesantes 
ataques de los enemigos, cuyo número 
es especialmente elevado. 

Para empezar, el nivel consta de seis 
subpantallas, de fácil orientación por 
su colocación rectangular. También 
llamaremos gran escalera a la que va 
desde abajo, en la pantalla inferior 
derecha, hasta arriba, en la superior 
derecha: pues habrá que subirla mu- 
chas veces. 



Aparecemos en la pantalla inferior 
media. Subimos por una escalera que 
veremos a la derecha y cogemos el 
boomerang para matar a un FLOU- 
MAN que vendrá de la izquierda. 
Después que haya pasado la perforado- 
ra, porque hay que recogerlo, bajar e ir 
a la derecha. Eliminamos un SLOU- 
MAN y tomamos la gran escalera. 
Nada más entrar en la pantalla superior 
veremos un agujero a la izquierda por 
el que nos metemos, cogemos un pico, 
y volvemos a ella para subir hasta 
arriba. Vamos para la izquierda hasta la 
pantalla superior izquierda. Allí, en el 
suelo, picamos de modo que el agujero 
quede antes del puente volátil según 
entremos. Volvemos a donde cogimos 
el pico y tomamos el que queda. 
Vamos al agujero, nos dejamos caer, 
cruzamos el puente volátil y picamos 
en el extremo, para bajar por la escale- 
ra. Cogemos todos los tesoros a la 
vista. Bajamos por la escalera a la 
pantalla inferior. Cogemos el tesoro de 
nuestra izquierda y saltamos a la dere- 
cha para coger el que veremos tras 
la puerta reversible. 
Volvemos y coge- 
mos el pico de esa 
misma pantalla. Va- 
mos a la gran esca- 
lera, y ahora al lle- 
gar encima de la 
pantalla superior 
media, veremos de- 
bajo tres bloques 
que protegen un tesoro encima de una 
escalera. Picamos para que el agujero 
quede encima del situado en el medio, 
saltamos y vamos a la izquierda. Baja- 
mos y cogemos la perforadora de esta 
pantalla. Volvemos a subir, nos deja- 
mos caer por el agujero, y ahora vamos 
para la derecha, no para el puente. 
Apareceremos dispuestos para recoger 
tres tesoros escalonados. Abajo queda- 
remos aprisionados, pero con la perfo- 
radora taladraremos el bloque izquier- 
do y nos dejamos caer y, si en la puerta 
no hay ningún enemigo, caemos hasta 
ella y cruzamos la puerta no reversible. 
Cogemos el tesoro superior, bajamos y 
cogemos el de la izquierda. Ahora 
picamos a la derecha, pero no nos 
caemos; subimos para salir por la 
puerta derecha, y, al bajar, cogemos la 
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perforadora de la pantalla. Con ella 
realizamos el mismo recorrido hasta 
llegar al agujero donde antes no nos 
caímos; ahora sí lo hacemos, para coger 
el tesoro y picar en cualquiera de Tos 
dos bloques laterales. En este extremo, 
v por el camino que más guste, vamos 
Hasta donde recogimos los tres tesoros 
escalonados, y nos dejamos caer para 
recoger la pala de la derecha. Con ella 
vamos a la gran escalera y nada más 
subirla, picamos para coger los tesoros 
antes inaccesibles de la pantalla supe- 





rior derecha. Ya solo falta bajar por la 
escalera de la izquierda y tomar la 
perforadora. Con ella, volvemos a su- 
bir la gran escalera, pero a la mitad 
salimos por el hueco izquierdo. Des- 
trozamos el bloque que impide la 
entrada a la escalera y solo resta bajar 
para coger todos los tesoros que vea- 
mos a nuestro alcance, que serán los 
últimos. 

Por fin, tras salir victorioso por la 
puerta, VICK XIII ha logrado salvar al 
mundo de una muerte asegurada, por 




lo que se nos felicitará con varios 
mensajes y una música mezcla de 
misterio y triunfo. También veremos 
cómo el símbolo de la pirámide de EL 
GIZA huye errante por la infinitud del 
espacio. Se nos mostrará el interruptor 
causante de todas nuestras desgracias, 
que, por fin, con solo pulsar la barra, 
podremos desactivar. Desde estas pági- 
nas, nuestra más cordial enhorbuena, 
VICK XIII, y si alguna otra vez quedas 
encerrado, recuerda este poderoso he- 
chizo: JOABBJLI. 






I NPUT PA88MO 


RD 


XJNCLHIIOB 


1 
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Programa 



■Por Arturo Jaldo Suárez ¡ 



RAZONES 

TRIGONOMETRICAS 



Programa de utilidad que 
hace un estudio de la trigono- 
metría. Este contiene tres op- 
ciones de gran servicio: la pri- 
mera entra de lleno en el cam- 
po de la teoría, la segunda te 
introduce en el campo del cál- 
culo con resultado en grados, y 
la tercera opción te lleva a la 
salida al BASIC. Si lo deseas 
puedes entrar de nuevo. 



10 


************************* 


20 


* 


RAZONES * 


30 




TRIGONOMETRICAS 


40 


* 


POR 


50 


* 


ARTURO J. SUAREZ * 


50 


* 


(c) 1988 


70 


* 


POR PROTEUS 


R0 


* 


PROGRAMAS * 


90 


************************* 



"1. Teoría" 
"2. Cálculo' 
"3. Fin del 

"Qué opciór 



' 1 . Tipos de 



100 CLSrKFY OFF: COLOR 15,1,1 
110 GOSUB 6120 
120 CLS 

130 LOCATE 10, 5: PRINT 
140 LOCATE 10,7:PRINT 
150 LOCATE 10,9:PRINT • 
programa" 

160 LOCATE 10.17:INPUT 

deseas" ; A 
170 ON A GOTO 180,5330,6060 
180 1 TEORIA 
190 CLS 

200 LOCATE 9,3:PRINT 
R.T. " 

210 LOCATE 9,5:PRINT "2 
220 LOCATE 9.7:PRINT "3 
s f undamenta les 
230 LOCATE 9,9:PRINT "4 

as usuales" 

240 LOCATE 9.11:PRINT"5 
i f erentes cuadr . " 
250 LOCATE 9.13: PRTNT"6 
sociados" 
260 LOCATE 9.15:PRINT "7. Menú pri 
rvc i pa 1 " 

270 LOCATE 9.19:INPUT "Que opción 
deseas " ; B 

280 ON B GOTO 290,460.1970.2890.36 

20,4610,5810 

290 CLS 

300 ' TIPOS DE R.T. 

310 LOCATE 11.2.-PRTNT "Tr i gonometr 
í a " 

320 LOCATE 11. 3: PRINT " 

330 PRINT " Hay dos tipos de razor 
es trigonomé- tricas.-" 



Signos 
Re 1 ac ione 

Angulos m 

Angulos d 

Angulos a 




340 PRINT" a) Razones trigonométri 
cas directas : " 

350 PRINT" - Sen(cc)=Cat .op./Hi 

360 PRINT: PRINT" - Cos(a)=Cat. 

cont . /Hip . " 

370 PRINT.-PRINT" - Tag(a)-Sen( 

a) /Cos (a) " 

380 PRINT: PRTNT" b) Razones trigon 
ométricas inversas.-" 
390 PRINT" - Sec(a)-l/Cos(a)" 

400 PRINT: PRINT" - CosecCa)»!/ 

Sen(a) " 

410 PRINT.-PRINT" - Cotag(a)-Co 

S(a)/Sen(a) " 

420 LOCATE 10, 25: PRINT" Pulsa una 

tecla" ; A$ 

430 A$-INKEY$ 

440 IF A$-"" THEN 430 

450 GOTO 190 

460 SCREEN 2 

470 ' SIGNOS 

480 OPEN "GRP.- "AS#1 

490 CIRCLE(80,90) .40 4/3 

D)-(110,90) 
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510 LTNE(80,50)-(80,130) 

520 DRAW "BM1 0 , 10" : PRTNT cua 

dr . H 

530 DRAW "BM1 1,10": PRINT #1."1 cua 
dr . " 

540 T..TNE(8,6)-(73. 6) 
550 LINE-(73,21) 
560 UNE- (8, 21) 
570 UNE- (8, 6) 

580 DRAW'BMl 70 . 30 " • PRTNT #l."Sen(cr 
)- + " 

590 DRAWBM171 .30" rPRTNT #l,"Sen(a 
)- + " 

600 DRAW'BMl 70. 40" : PRTNT #1."Cos(a 
)- + 

610 DRAW'BM] 71 . 40 " : PRTNT #l,"Ccv?¡(a 



620 
)- 
630 
)- 
640 
) 

650 

)- 

660 
(a) 
670 
(a) 
680 
(a) 
690 
(a) 
700 
710 
720 
730 
740 
750 
760 
770 
780 
790 



DRAW'BM'! 70 .50 " • PRTNT #1 , "Tag (a 

h " 

DRAW'BMl 71 .50" : PRINT #1 . "Tag (a 

DRAW'BMl 7n . 60" ■ PRTNT #1 . "Sec (d 
+ " 

DRAW'BMl 71 .60" ¡ PRTNT #1 . "Sec(a 

DRAW"BM170.70" :PRINT #1 , "Coser 

DRAW'RM171 .70":PRINT #3 , "Cosec 

DRAW'BMl 70 . 80 " : PRTNT #1 . "Cotag 

DRAWBM171 .B0" .-PRTNT #1 , 'Totag 
= + " 

T.INE(80,90)-(100.60) 
LINE-(100,90) 

CIRCLE(80, 90) , 10, ,0, .7853981* 
DRAW "BM105 , 50" : PRINT #1,"I" 
DRAW "BMl.06,50" :PRINT #1,"I" 
DRAW "BM45 , 50" : PRINT #1,"II" 
DRAW "BM46, 50": PRINT #1,"II" 
DRAW "BM28, 115" .-PRINT #1,"III" 
DRAW "BM29, 115" :PRINT #1,"III" 
DRAW "BM106, 115" : PRINT #1,"IV" 




800 DRAW "BM107, 115" : PRINT #1,"IV" 

810 DRAW "BM60, 180" : PRINT #l,"Puls 

a una tecla";A$ 

820 A$-INKEY$ 

830 IF A$-"" THEN 820 

840 GOTO 850 

850 CLS : SCREEN 2 

860 DRAW'BMIO, 10": PRINT #1,"2 Cuad 
r . " 

870 DBAW-BMIULÜ": PRINT #1 "2 Cuad 

r . " 

880 LINE(8,6)-(73,6) 
890 LINE-(73,21) 
900 LINE-(8,21) 
910 LINE-(8,6) 

920 CIRCLE(80,90) ,40 4/3 

930 LINE(50,90)-(110,90) 

940 IJNF.(S0,50.)-(00,130) 

950 LINE(80,90)-(60,60) 

960 CIRCLE(80,90) , 10, ,0,2.09439510 

26667# 

970 LINE(60,60)-(-60,90) 

980 DRAW'BMl 70 , 30 " : PRINT #1, "Sentó 

)- +" 

990 DRAWBM171, 30 ": PRINT #!,'Sen(a 
)» + ■' 

1000 DRAWBM170 , 40 " : PRINT #l,"Cos( 
CC)- 

1010 DRAW'BMl 71 , 40" : PRTNT #l,"Cos< 
a)- -" 

1020 DRAW'BMl 70 , 50 " : PRINT #l/'Tag( 
a)- -" 

1030 DRAWBM171 ,50" : PRINT #l. M Tag< 
a) - -" 

1040 DRAWBM170 . 60" : PRINT #l."3ec( 
a)= -" 

1050 DRAW3M171, 60" : PRINT #l,"Sec( 

a)- -" 

1060 DRAW"BM170,70" : PRINT #1 . "Coae 
c(a)=+" 

1070 DRAW'BMl 71, 70": PRINT #X,"Co»e 
c(a)~+ " 

1080 DRAW'BMl^O , 80 " : PRINT #l,"Cota 
gla)«- " 

1090 DRAWBM17Í , 30 " : PRINT #1 . "Cota 
g(a)— " 

1100 DRAW'BMl 05 , 50" -.PRINT #1."I" 
1110 DRAW'BMl 06 ,50" : PRINT 41, "1" 
1120 DRAWBM45, 50" ¡PRINT #1,"II M 
1130 DRAWBM46, 50": PRINT #1,"II" 
1140 DRAWBM28, 115" : PRINT #1,"III" 
1150 DRAWBM29. 115" : PRINT #1,"III" 
1160 DRAW'BMl 06 ,115": PRINT #1,"IV" 
1170 DRAW"BM107.115":PRINT #1,"IV" 
1180 DRAWBM60, 180" : PRINT #l,"PulS 
a una tecla";A$ 
1190 A$-INKEY$ 
1200 IF A$-"" THEN 1190 
1210 GOTO 1220 
1220 CLS: SCREEN 2 

1230 DRAW'BMIO, 10": PRINT #1,"3 Cua 



38 




dr. " 

1240 DRAW'BMll.10" :PRINT #1,"3 Cua 
dr . " 

1250 LINE(8,6)-(73,6) 
1260 LINE-(73,21) 
1270 LINE-(8,21) 
1280 LINE-(8,6) 

1290 CIRCLE(80,90) ,40 4/3 

1300 LINE(50,90)-(110,90) 

1310 LINE(80,50)-(80,130) 

1320 LINE(80,90)-(60,120) 

1330 CIRCLE(80, 90) ,10, ,0,4.3633231 

305556# 

1340 LINE(60,120)-(60,90) 

1350 DRAW'BMI 70 ,30" : PRINT #l,"Sen( 
a)- -" 

1.360 DRWHMl71,ao»:PRINT M, "Sen ( 
a)- -" 

1370 r>RAW"BM170 , 40" : PRINT #l,"Cos( 
a)- -" 

1380 DRAW'BMI 71, 40": PRINT #l."Cos( 

a)- 

1390 DRAW'BMI 70,50" : PRINT #l,"Tag( 
a)- +" 

3 400 DRAW'BMI 71. 50": PRINT #l."Tag( 
O)- + " 

1410 DRAW'BMI 70 , 60 " : PRINT #l."Sec( 

00- -" 

1420 DRAW'BMI 71 , 60" : PRINT #l,"Sec( 
a)- -" 

1430 DRAW'BMI 70, 70"; PRINT #1 . "Cose 
c(a)— " 

1440 DRAW'BMI 71. ,70" • PRINT #1 . "Cose 
c(a)— " 

1450 DRAWBM170, 80" : PRINT #l,"Cota 
g(a) = + " 

1460 DRAW'BMI 73 , 80" : PRINT #1 , "Cota 
g(a)-+" 

1470 DRAW'BMI 05. 50": PRINT #1 , "I" 
1.480 DRAW'BMI 05 , 50 " : PRINT #1,"I" 
1490 DRAWBM45 , 50" : PRINT #1."TT" 
1500 DRAWBM46, 50" .-PRINT #1."II" 
1.510 DRAWBM28. 115": PRINT #1 , "III" 



1520 DRAWBM29 ,115": PRINT #1,"III" 
1530 DRAW'BMI 06. 115": PRINT #1. . "IV" 
1540 DRAW "BM1 07,115": PRINT #1 , "IV 

1550 DRAW "BM60 . 1R0" : PRINT #l,"Pul 

sd una tecla" ;A$ 

1560 A$=INKEY$ 

1570 IF A$«"" THEN 1560 

1^80 COTO 1590 

1590 CI.S : S CREEN 2 

1600 DRAW'BMI 0, .10" : PRINT #1 , "4 Cua 
dr . " 

1610 DRAW'BMI 1 , 10" : PRINT #1 , "4 Cua 

dr . " 

1620 T,INEf8,6) -(73,6) 

1630 LINE-(73,21) 

1640 LINE-(8,21) 

1650 LINE-(8,6) 

1660 CTRCLE(S0,9O) .40, , , ,4/3 

1670 LINE(50,90)-(UO,90) 

1680 LINE(80,50)-(80,130) 

1690 LINE(80,90)-(98,123) 

1700 CIRCLF(80.90) ,10, ,0,5.0614548 

314444* 

1710 LINE(98, l?3)-(98,90) 

1720 DRAWBM170, 30": PRINT #l,"Sen( 

a)- -" 

1730 DRAWBM171, 30": PRINT #l,"5en( 

a)- 

1740 DRAW"BMl70,40":PRINr #T, Tos f 
a)- +" 

1750 DRAWBM171, 40": PRINT #l,"Cos( 
a)= +" 

1760 DRAW'BMI 70 , 50 " : PRINT #l,"Tag( 
a)- -" 

1770 DRAW'BMI 71, 50 ": PRINT #l,"Tag( 
a)- -" 

1780 DRAWBM170, 60" : PRINT #l,"Sec( 
a)- + " 

1790 DRAWBM171, 60": PRINT #l,"Sec( 
a)- +" 

1800 DRAW'BMI 70. 70": PRINT #1 . "Cose 
c(a)— " 

1810 DRAW'BMl.71 .70": PRINT #1 , "Cose 
c(a)«- " 

1820 DRAW'BMI 70, 80": PRINT #1 , "Cota 
g(a)«- " 

1830 DRAWBM171, 80": PRINT #1 . "Cota 
g(cc)«- " 

1840 DRAW'BMI 05, 50" : PRINT #1 , "I" 
1850 DRAW'BMI 06, 50" .-PRINT #1,"I" 
1860 DRAWBM45. 50" : PRINT #1."TT" 
1870 DRAWBM46, 50 ": PRINT #1,"II" 
1880 DRAW'BM28,115":PRINT #1."TII" 
1890 DRAWBM29, 115": PRINT #1,"III" 
1900 DRAWBM106, 1.15" : PRINT #1 , "TV" 
1910 DRAW;BM107,115":PRINT #1,"IV" 
1920 DRAW"BM60,1R0":PRINT #l."Puls 
a una tecla";A$ 
1930 A$«INKEY$ 
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1940 IF A$-"" THEN 1930 
1950 CtOSE 

1960 SCREEN 0:GOTO 190 

1970 ' RELACIONES FUNDAMENTALES 

1980 OPEN "GRP:"AS#1 

1990 CLS: SCREEN 2 

2000 DRAW'BMIO, 10" .-PRINT #1,"1 Reí 
ación fundamental" 

2010 DRAW'BMl 1,10": PRINT #1,"1 Reí 

ación fundamental" 

2020 LINE(8,6)-(185,6) 

2030 LINE-(185,21) 

2040 LINE-(8,21) 

2050 LINE-(8,6) 

2060 LINE(20,110)-(80,110) 

2070 LINE-(80,70) 

2080 LINE-(20,llu) 

2090 CIRCLE(20,U0) ,20, ,0, .6981317 
0088889# 

2100 DRAWBM45 , 97" : PRINT #1 , "a" 
2110 DRAWBM12 , 110": PRINT #1,"0" 
2120 DRAWBM84, 67": PRINT #1,"A" 
2130 DRAW"BM84,113":PRINT #1,"B" 
2140 DRAWBM20, 40": PRINT #l,"SenM 
a)+Cos a (a)-l" 

2150 DRAW"BM21,40":PRINT #l,"SenM 
a)+Cos a (a)-l" 

2160 DRAWBM12 , 130" : PRINT #l,"Sen( 
a)«AB/OA" 

2170 DRAW"BM12,141":PRINT #l."Cos( 
a)-OB/OA" 

2180 LINE(108,67)-(108,141) 

2190 DRAW'BMl 13, 67": PRINT #l,"Sen a 

(a) +Cos a (a)-" 

2200 DRAW"BM113.77":PRINT *1,"(AB/ 
OA) 2 +(QB70A) r -~ 

2210 DRAW"BM113,87":PRINT #l,"AB a / 
OA a +OB a /OA a «" 

2220 DRAW'BMl 13 , 97" : PRINT tl,"AB a + 
OB 2 /OA a -" 

2230 DRAW'BMl 13, 107": PRINT #l,"OA a 
/OA 2 -l" 

2240 DRAWBM60, 180": PRINT #l,"Puls 
a una tecla";A$ 



1. 


T«or 


** 


2. 


CéU 


mío 


*• 


Fin 


»i4n átMM? ■ 





2250 A$-INKEY$ 

2260 IF A$-"" THEN 2250 

2270 GOTO 2280 

2280 CLS : SCREEN 2 

2290 DRAW'BMl 0 , 10" : PRINT #1,"2 Reí 
ación fundamental" 

2300 DRAW'BMl 1,10": PRINT #Í."2 Reí 

ación fundamental" 

2310 LINE(8,6)-(185,6) 

2320 LINE-(185,21) 

2330 LINE-(8,21) 

2340 LINE-(8,6) 

2350 DRAWBM20 ,40" s PRINT #1,"1+Tag 
a (a)-Sec a (a) " 

2360 DRAWBM21 . 40" : PRINT #FOR,"l+T 

ag a (a)-Sec a (a!S 

2370 LINE(20,110)-(80,110) 

2380 LINE-(80,70) 

2390 LINE-(20,110) 

2400 CIRCLE(20, 110) , 20, ,0, .6981317 
0088R9# 

2410 DRAWBM45, 97" : PRINT #1 , "a" 
2420 DRAW"BM12,116" :PRINT #1,"0" 
2430 DRAWBM84 , 64" ¡ PRINT #1 , "A" 
2440 DRAWBM84, 113" .-PRINT #1,"B" 
2450 DRAW'BMl 2,. 130": PRINT #l,"Tag( 
a)«AB/OB" 

2460 DRAW"BM12.141":PRINT #l,"Sec( 
a)-OA/OB" 

2470 LINE(108,67)-(108,141) 

2480 DRAW"BM113,67" :PRINT #1,"1+Ta 

g a (a)-" 

2490 DRAW"BM113,77":PRINT #1,"1+(A 
B/OB) 2 -" 

2500 DRAW"BMU3,87":PRINT #1."1+(A 
B 2 /OB 2 )-" 

2510 DRAW'BMl 13, 97": PRINT #l,"(OB a 
+AB 2 )/OB a - 

2520 DRAW'BMl 13, 107". -PRINT #1 , "OA 2 
/OB 2 -" 

2530 DRAW'BMl 13, 117": PRINT #1 , "Sec 
2 (a) 

2540 DRAW'BM60,180":PRINT #l,"Puls 

a una tecla" ;A$ 

2550 A$=INKEY$ 

2560 IF A$-"" THEN 2550 

2570 GOTO 2580 

2580 CLS: SCREEN 2 

2590 DRAW'BMIO, 10" : PRINT #1."3 Reí 
ación fundamental" 

2600 DRAW'BMll, 10" .-PRINT #1,"3 Reí 

ación fundamental" 

2610 LINE(8,6)-(185,6) 

2620 LINE-(185,21) 

2630 LINE-(8,21) 

2640 LINE-(8,6) 

2650 DRAWBM20, 40": PRINT #l,"l+Cot 

ag* (cO-Cosec- 1 loo* 

2.660 DRAW"BM21,40" :PRINT #l,"l+Cot 
ag a (a)-Cosec 8 (a) 
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.6981317 



: PRTNT #l."AB a + 
" : PRTNT #1 , "OA 2 



: PRTNT #1 , "Coí 



: PRTNT #] , "Puls 



2670 LINE(20.110)-(80,110) 
2680 LINE-(80,70) 
2690 LINE-(20,110) 
2700 CIRCLE(20.110) .20, ,0 
008889# 

2710 DRAWBM45 .97" ■ PRTNT #1 "a" 
2720 DRAW'BMl 2 , 116" : PRINT #1 "O" 
2730 DRAWBM84 , 67" ; PRINT #1 , "A" 
2740 DRAWBM84, 113" : PRINT #1 , "B" 
2750 DRAW'BMl 2. 130" : PRINT #1 , "Cota 
g(cc)-OB/AB" 

2760 DRAW'BMl 2, 141": PRINT #1 , "Cose 
c(a)^OA/AB" 

2770 UNE ( 125 , 67) - < 1 25 , 141 ) 

2780 DRAWBM130 ,67" : PRINT #l,"l+Co 

tag 2 (a)-" 

2790 DRAW'BMl 30. 77": PRINT #l,"l+(0 
B/AB) 2 ■»•' 

2800 DRAW'BMl 30, 87": PRINT #l,"l+OB 
2 /AB 2 " 

2810 DRAW'BMl 30,97" 
OB 2 /AB 2 " 

2820 DRAW'BMl 30 , 1 07 
/AB 2 «" 

2830 DRAW'BMl 30, 117 
ec* (a) 

2840 DRAWBM60 .180" 
a una tecla" ;A$ 
2850 A$=TNKEY$ 
2860 IF A$-"" THEÑ 2850 
2870 a.OSF 

2880 S CREEN 0:GOTO 190 
2890 1 ANGULOS MAS USUALES 
2900 CLS.-SCREEN 2 
2910 npKN "GRP : "A3#l 
2920 DRAW "BM10 . 10" : PRINT #1 
lo de 30O" 

2930 DRAW "BM1 1 . J 0 " : PRTNT #1 
lo de 309" 

2940 LINE(8,6)-(J35,6) 
2950 LTNE-(U5,20) 
2960 LIME- (8, 20) 
2970 LINE-(8,6) 
2980 DRAW"BM30, 30" -PRTNT #1, 
09)«l/2" 

2990 DRAWBM31 , 30" : PRINT #l,"Sen(3 
09)-l/2" 

3000 DRAWBM30. 40 " r PRTNT #1 
09)-^3/2" 

3010 DRAWBM31 ,40" 
0Q)=>r3/2" 

3020 DRAW"BM30,50" 
0O)-^3/3" 

3030 DRAWBM31 ,50" 
09 W3/3" 

3040 DRAW"BM30,60" 
0Q)-2-nT3/3" 
3050 DRAWBM31 .60' 
09)-2^3/3" 
3060 DRAW"BM30,70' 



: PRINT #1, 



'Angu 
' Angu 



"Sen (3 



"Cos (3 
'Cos(3 



: PRTNT #1 . "Tag(3 
: PRTNT #1 . "Tag(3 
: PRTNT #1 . "Sec(3 
: PRINT #l,"Sec(3 
:PRINT #l."Cosec 



(30Q)-2 

3070 DRAW'BM31,7G" 
(30Q)-2 

3080 DRAW"BM30,80" 

(309 W3 

3090 DRAW M BM31,80" 
(30QW3" 

3100 DRAW"BM60,180 
a una tecla" ;A$ 
3110 A$-INKEY$ 
3120 IF A$-"" THEN 
3130 GOTO 3140 
3140 CLS:SCREEN 2 
3150 DRAW'BMl 0,10" 
o de 459" 

3160 DRAW'BMl 1 , 10" 
o de 459" 

3170 LINE(8,6)-(1 1 
3180 LINE-(115,20) 
3190 LINE-(8,20) 
3200 LINE-(8,6) 
3210 DRAW'BM30,30" 
.5"o)-^2/2" 

3220 DRAW"BM31,30" 
So)-^^" 

3230 DRAW"BM30,40" 
59W2/2" 

3240 DRAWBM31 ,40" 
5o)-vr2/2" 

3250 DRAW"BM30,50" 
59)-l" 

3260 DRAWBM31 ,50" 
59)-l" 

3270 DRJ\W"BM30,60" 
59 W2" 

3280 DRAW'BM31,60" 
59W2" 

3290 DRAW"BM30,70" 
(459) -^2" 

3300 DRAWBM31 ,70" 
(459W2" 

3310 DRAW"BM30,80" 
(459)-!" 



: PRINT #1, 
: PRINT #1, 

: PRINT #1, 
": PRINT #1 



"Cosec 
"Cotag 

"Cotag 
,"Puls 



3110 

.•PRINT #1 . 1 
: PRINT #1 , 1 
5,6) 

:PRINT #1 . 
: PRINT #1, 
:PRINT #1,' 
: PRINT #1, 
: PRINT #1 , 
: PRINT #1, 
.•PRTNT #1 , 
: PRTNT #1, 
: PRINT #1. 
: PRINT #1, 
:PRINT #1 , 



Angul 
Angul 



"Sen(4 
"Sen (4 
"Cos (4 
"Cos(4 
"Tag (4 
"Tag (4 
"Sec(4 
"Sec(4 
"Cosec 
"Cosec 
"Cotag 




8«rn<3 
Ce«(3t|>-r9/2 
T«f(3§t)-<T3/3 
t«o<tt|>-8rB/J 
€ofto<Sl|)-2 

c*i«f(iti)-rs 



Pulsa una ttel^ 
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3320 DRAWBM31 , 80" : PRTNT #1 . "Cotag 
(452) -4 M 

3330 DRAWBM60, 180" : PRTNT #l,"Puls 

a una tecla";A$ 

3340 A$-INKEY$ 

3350 IF A$-"" THEN 3340 

3360 GOTO 3370 

3370 CLS : SCREEN 2 

3380 DRAW"BM10.10":PRINT #1 . "Angul 
o de 609" 

3390 DR AW " BM1 1 , 1 0 11 ! PRINT #1, "Angul 
o de 60Q" 

3400 LINE(8,6)-(115,6) 
3410 LINE-(115,20) 
3420 LINE-(8,20) 
3430 LINE-(8,6) 

3440 -DRAW"BM30, 30": PRTNT #l,"Sen(6 
09)- > r3/2" 

34.50 DRAW"BM31,30":PRINT #l,"Sen(6 
0Q)- > r3/2" 

3460 DRAWBM30, 40": PRINT #1, "Cosí 6 
0O-1/2" 

3470 DRAWBM31, 40": PRINT #l."Cos(6 
0Q)-l/2 

3480 DRAW"BM30,50":PRINT #l,"Tag(6 
0QW3" 

3490 DRAWBM31: , 53"" : PRINT #l,"Tag(6 
0Q)-<3" 

3500 DRAWBM30 , 60" : PRINT #ly"Sec(6 

0Q)-2" 

3510 DRAWBM31, 60" .-PRINT #l,"Sec($ 
0Q)-2" 

3520 DRAWBM30, 70": PRINT #l,"Cosec 
(60Q)-2^3/3" 

3530 DRAWBM31, 70 ": PRINT #l,"Cosec 
(60Q)-2^T3/3" 

3040' PRAW"BM30,80" ¡PRINT #1, "Cotag 
(609 W3/3" 

3550 DRAWBM31 ,80" : PRINT #l,"Coatg 
(60Q)=^3/3" 

3560 PRAWBM60,. 180": PRTNT #] , "Puls 

a una tecla";A$ 

3570 A$=INKEY$ 

3580 IF A$-"" THEN 3570 

3590 CLOSE 

3600 CLS : SCREEN 0 

3610 GOTO 190 

3620 CLS 

3630 1 ANGULOS EN DIFERENTES CUADR 
ANTES 

364o\oCATE 3,1: PRTNT "1 Caso.-" 
3650 PRINT : PRINT "Si un ángulo est 
a situado en el primer cuadrante y 
su va los es de 30Q,45Q ó 609 se h 
an de saber directamente de memori 
a . " 

3660 PRINT: PRINT" Si nos piden que 
calculemos las R.T. de un ángulo d 
esconoridn en el primer cuadrante 
lo normal es que nos den el valor 



de alguna de sus R.T. y con lo cua 
1 podemos calcular las demás." 
3670 PRINT: PRTNT" A veces puede ocu 
rrir que te pregunte por las R.T. 
de un ángulo desconocido del prime 
r cuadrante y sin embargo no me de 
n como dato ninguna de sus R.T. si 
no que me den alguna de sus R.T. d 
e su áangulo complementario." 
3680 T.OCATE10, 22: PRINT "Pulsa una 
tec la"; A$ 
3600 A$-INKEY$ 
3700 TF A$«"" THFN 36^0 
3710 CLS 

3720 PRINT"Para realizar este tipo 

de problemas tendremos que saber 
que dos áangulos son complementar i 
os cuando su suma es de 909 . " 
3730 PRINT: PRINT" Además saber que 
el seno de un ángulo coincide con 
el coseno de su complementario y q 
ue el coseno de un ángulo coincide 
con el seno de su complementario. 

3740 LOCATE 10 . 22 : PRINT"Pu Isa una 

tecla" ; A$ 

3750 A$-INKEY$ 

3760 IF A$«"" THEN 3750 

3770 CLS 

3780 L0CATE1,1:PRINT"2 Caso:" 
3790 PRINT :PRINT"Cuando un ángulo 
está situado en el 2Q cuadrante su 
medida está comprendida entre 90o 
y 1809 y para calcular las R.T. t 
endremos que restarle a 180© el án 
guio que nos den" 

3800 tOCATE 10.22:PRINT"Pulsa una 

tecla" : A$ 

3810 A$-INKEY$ 

3820 TF A$-"" THEN 3810 

3830 CLS 

3840 LOCATE 1,1 .-PRINT "3 Caso:" 
3850 PRINT :PRINT"Para calcular las 

R.T. de un ángulo situado en el t 
ercer cuadr . tendremos que restar 1 
e al ángulo que nos da 180Q" 
3860 PRINT: PRINT'Con lo que obtend 
remos como resultado 300,450 ó 609 

o si el resultado es distinto de 
los anteriores tendrán que darnos 
algún dato adicional" 
3870 LOCATE 10, 22: PRINT "Pulsa una 

tecla" ; A$ 
3880 A$-INKEY$ 
3890 IF A$-"" THEN 3880 
3900 CLS 

3910 LOCATE 1,1:PRINT"4 Caso:" 
3920 PRINT :PRINT"Para calcular las 
R.T. de un ángulo situado en el 4 
9 cuadrante tendremos que restarle 



al ángulo que nos dan 360Q con lo 
que obtendremos como resultado 30 
2,459 ó 609. m 

3930 PRINT:PRINT"Si obtendremos ot 
ro resultado diferente tendrán que 

darnos algún dato adicional." 
3940 LOCATE 10,22:PRINT "Pulsa una 

tecla" ; A$ 
3950 A$-INKEY$ 
3960 IF A$-"" THEN 3950 
3970 CLS 

3980 LOCATE 1,1:PRINT"5 Caso:" 
3990 PRINT:PRINT"Si a es un ángulo 

cualquiera llamáramos ángulo opue 
sto del ángulo a a un nuevo ángulo 

que representaremos por -a." 
4000 PRINT:PRINT"E1 ángulo -a tien 
e la misma amplitud que a solo que 

medida en sentido contrario." 
4010 PRINT: PRINT'Las R.T. de dos á 
ngulos opuestos se relcionan del s 
i guíente modo: 

4020 PRINT"Cosideremos la circunfe 
rencia goniométrica y sobre ella u 
n ángulo a situado en el primer cu 
adrante y su opuesto:" 
4030 LOCATE 10.22.-PRINT "Pulsa una 



4290 DRAWBM60 , 40 " : PRINT #l, "Cos<- 
o ) -Cos (a) " 

4300 DRAWBM61 ,40" : PRINT #1, "Cosí- 
ce) «Cos (a) " 

4310 DRAWBM60, 50": PRINT #l,"Tag(- 
a)— Tag(a) " 

4320 DRAWBM61 ,50" : PRINT #l,"Tag(- 
a)--Tag(a) " 

4330 DRAWBM60, 60" : PRINT #l,"Sec(- 
a)-Sec (a) " 

4340 DRAWBM61 .60" : PRINT #l,"Sec(- 
or) -Sec (a) " 

4.350 DRAW"BM60 , 70 " : PRINT *1 , "Cosec 
(-a)— Coser (a) " 

4360 DRAW-BM61 ,70": PRINT #1 , "Cosec 
(-a) «-Cosec (a) " 

4370 PRAW"BM60 ,80" : PRINT #l,"Cotag 
(-a)— Cotag(a) " 

4380 DRAWBM61, 80 ": PRINT #l,"Cotag 
(-a)— Cotag (a) " 

4390 DPAWBM60 . 180 " : PRINT #l,"Puls 

a una tecle"; A$ 

4400 A$-INKEY$ 

4410 IF A$-"" THEN 4400 

4420 CLOSE 

4430 CLS.-SCREEN 0 

4440 LOCATE 1,1:PRINT"6 Caso:" 

4450 PRINT : PRINT'La interpretación 

de un ángulo mayor que 360Q se ef 
ectua del siguiente modo:" 
4460 PRINT "Supongamos que un homb 
re sube por una escalera de caraco 
ly hasta que llega a arriba a dado 

dos vualtas completas y 90Q más." 
4470 PRINT"Este hombre habrá recor 
rido un ángulo de 3609+3609+909-81 
09" 

4480 PRINT'Para calcular las R.T. 
de un ángulo cuya amplitud sea sup 
erior a 360Q tendremos que dividir 
el ángulo que nos den entre 3602. 

4490 PRINT"E1 cociente que obtendr 
emos de la división corresponderá 

a un ángulo que siendo menor que 3 

609 es equivalente al inicial" 

4500 LOCATE 10,22 : PRINT "Pulsa un 

a tecla";A-$ 

4510 A$=INKEY$ 

4520 IF A$-"" THEN 4510 

4530 CLS 

4540 LOCATE 1.1: PRTNT "7 C*so ; " 
4550 PRINT : PRINT "Para calcular la 
s R.T. de un ángulo cuya amplitud 
sea superior a -360Q tendremos que 
dividir el ángulo que nos den ent 
re 3609. " 

4560 PRINT"E1 cociente que obtendr 
emos de la división corresponderá 
a un ángulo que siendo menor que 3 



tec 1 a" ; A$ 
4040 A$-INKEY$ 
4050 IF A$-"" THEN 4040 
4060 CLS : S CREEN 2 
4070 OPEN "GRP:"AS#1 

4080 CIRCLE(80,90) ,40 4/3 

4090 LINE(50.90)-(110,90) 

4100 LINE(80,50)-(80, 130) 

4110 LINE(80,90)-(100,60) 

4120 LINE-(100,90) 

4130 LINE(80,90)-(100,123) 

4140 LINE-ílO0,9O) 

4150 LINE(100,90)-(110,99) 

4160 DRAWBMl 11,99": PRINT #l,"Cos( 

a) " 

4170 LINE(100,120)-(110,125) 

4180 DRAW'BMll 1,122": PRINT #l,"Sen 

(-a) " 

4190 LINE(100,90)-(110/85) 

4200 DRAWBMl 11, 85" : PRINT #l,"Cos( 

a) " 

4210 LINE(100,70)-(U0,65) 

4220 DRAWBM111, 65" .-PRINT #l,"Sen( 

a) " 

4230 DRAW"BM60,180":PRINT #1 , "Puls 

a una tecla" ;A$ 

4240 A$-INKEY$ 

4250 IF A$«"" THEN 4240 

4260 CLS : S CREEN 2 

4270 DRAVTBM60, 30": PRINT #l,"Sen(- 

ot) —Sen (a) " 

4280 DRAWBM6 1,30": PRINT #l,"Sen(- 
a)'-Sen(a) " 
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60Q es equivalente al inicial. " 
4570 LOCATE 10, 22: PRTNT "Pulpa una 

tecla" ; A$ 
4580 A$~INKEY$ 
4590 IF A$-"" THEN 4570 
4600 GOTO 190 
4610 1 ANGULOS ASOCIADOS 
4620 CLS 

4630 LOCATE .1 . 1 : PRTNT"1 Caso:" 
4640 PRINT : PRINT "Dos ángulos son 
complementarios cuando suman 90Q 
4650 PRINT"Sea a un ángulo que sup 
ondremos está situado en el primer 

cuadrante : " 
4660 PRINT"E1 ángulo cómpl ementar i 
o de a es' 90Q-a . " 

4670 LOCATE 10,22: PRINT "Pulsa una 

tecla";A$ 
46R0 A$-TNKEY$ 
4690 IF A$-"" THEN 4680 
4700 CLSrSCREEN 2 
4710 OPEN "GRP:"AS#1 
4720 DRAWBM60, 30" : PRINT #l,"Sen(9 
OQ-a)-Cos(a) " 

4730 DRAWBM61 .30": PRINT #l,"Sen(9 
OQ-a)-Cos(a)" 

4740 DRAW"PM60. 40": PRINT #l,"Cos(9 
OQ-a)-Sen(a) " 

4750 DRAWBM6 1,40": PRINT #l,"Cos(9 
OQ-a)-Sen(a) " 

4760 DRAWBM60 , 50" : PRINT #l."Tag(9 
OQ-a)-Cotag(a) M 

4770 DRAWBM61 ,50" : PRINT #l,"Tag(9 
OQ-cc)-Cotag(a) " 

4780 DRAWBM60, 60": PRINT #l,"Sec(9 
0Q-a) -Cosec (a) " 

4790 DRAWBM61, 60": PRINT #l,"Sec(9 
0e-a) -Cosec (a) " 

4800 DRAWBM60 , 70 " : PRINT #1, "Cosec 
C90Q-a)-Sec(a) " 

4810 DBAW"BM6 1,70": PRINT #1 , "Cosec 
(909-a)-Sec(a) " 

4820 DRAWBM60, 80": PRINT #1 , "Cotag 
(90Q-a)-Tag(a) * 

4830 DRAWBM61 . 80" : PRINT #1, "Cotag 
(90Q-a)-Tag(a) " 

4840 DRAWBM60 , 180" : PRINT #l,"Puls 

a una tecla" ;A$ 

4850 A$-INKEY$ 

4860 IF A$-"" THEN 4850 

4870 CLS:SCREEN 0 

4880 LOCATE 1,1 .-PRINT "2 Caso:" 

4890 PRINT: PRINT "Dos ángulos diré 

mos que se diferencian en 90Q cuan 

do uno de ellos se obtiene de suma 

ríe 90Q al otro. " 

4900 PRINT "Consideremos dos ángul 
os que se diferencian en 90Q y uno 

de ellos será a y el otro 90Q+a" 
4910 LOCATE 10,22:PRINT "Pulsa una 
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tecla" ; A$ 
4920 A$-INKEY$ 
4930 IF A$«"" THEN 4920 
4940 CLS:SCREEN 2 

4950 DRAWBM60 , 30" : PRINT #l,"Sen(9 

0Q+a)-Cos(a) " 

4960 DRAW-BM61 ,30": PRINT #l,"Sen(9 
09+oc)-Cos (a) " 

4970 DRAWBM60 , 40 " : PRINT #l,"Cos(9 
0Q+a)— Sen(a) " 

49R0 DRAWBM61 ,40" : PRINT #l,"Cos(9 
0Q+a)— Sen (a) " 

4990 DRAWBM60 . 50" : PRINT #l,"Tag(9 
09+oc) — Cotag (a) " 

5000 DPAW"BM6 1 ,50" : PRINT #l,"Tag(9 
0Q+cO— Coatg(a) " 

5010 PRAWBM60 ,60" ¡ PRTNT #l,"Sec(9 
0o+a) — Cosec (n) " 

^020 DRAWBM61 .60": PRINT #l,"Sec(9 
09+a ) --Cosec (a) " 

5030 DRAWBM60 , 70" : PRINT #1 . "Cosec 
(90Q+c¿) -Sec (a) " 

5040 DPAWBM61 .70" -.PRINT #1 ."Cosec 
(90Q4a) -Sec (a) " 

5050 DRAWBM60 .80" : PRTNT #1 . "Cotag 
(90O-KO— Tag(a) " 

5060 DRAW"BM6 1,60 "-.PRINT #1, "Cotag 
(900+oc)— Tag(a) " 

5070 DRAWBM60. 180" :PPINT #l."Puls 

a una tecla" ; A$ 

5080 A$»TNKEY$ 

5090 IF A$-"" THEN 5080 

5100 CLS-.SCREFN 0 

5110 LOCATE 1.1: PRINT "3 Caso:" 

5120 PRINT :PRINT"Dos ángulos se d 

icen que son suplementarios cuando 

MU suma es de J 809 . " 
5130 PRINT"Consideremos don ángulo 
s.uno o: y su suplementario 180P-oc" 
5140 LOCATE 10, 22 .-PRINT "Pulsa una 

tecla" ;A$ 
5150 A$-INKEY$ 
5160 TF A$~"" THEN 5150 
5170 CLS:SCREEN 2 

5180 DRAWBM60. 30" : PRINT #l."Sen(l 
80o-a)-Sen(a) " 

5190 DRAWBM6 1,30": PRINT #l,"Sen(l 
80Q-a) -Sen (ce) " 

5200 DRAWBM60 , 40 " : PRINT #l,"Cos(l 
809-a) — Cos (a) " 

5210 DRAW"BM61 ,40" : PRINT #3,"Cos(l 
80Q-a) --Cos (a) " 

5220 DRAWBM60, 50 ": PRINT #l,"Tag(l 
80Q-a)— Tag(a) " 

5230 DRAWBM61, 50": PRINT #l,"Tag(l 
80Q-a)— Tag(a) " 

5240 DRAWBM60 , 60" : PRTNT #i,"9ec(l 
80Q-a) — Sec(a) u 

5250 DRAWBM61, 60% PRINT Ü, M SecU 
80Q-a)— Sec(a) " 





5260 DRAWBM60 , 70 " : PRINT #l,"Cosec 
(1809-a)-Cosec(a)" 

5270 DRAWBM61 ,70" : PRINT *1, "Cosec 
(180Q-a)-Cosec(a) " 

5280 DRAWBM60 , 80" : PRINT #1, "Cotag 

(1809-a) — Cotag(oc) " 

5.290 DRAVTBM61, 80": PRINT *1, "Cotag 

(1809-a) — Cotag(a) " 

5300 DRAWBM60 , 180" : PRINT *l,"Puls 

a una tecla";A$ 

5310 A$-INKEY$ 

5320 IF A$-"" THEN 5310 

5330 CLS : SCREEN 0 

'5340 LOCATE 1,1: PRINT "4 Caso:" 

535.0 PRINT: PRINT "Dos ángulos se d 

icen que se diferencian en 180Q cu 

ando uno de ellos s e obtiene de s 

umarle 1809 al otro." 

5360 PRINT "Consideremos dos ángul 

os, uno a y el otro 1809+a" 

5370 LOCATE 10,22:PRINT "Pulsa una 

tecla" ; A$ 
5380 A$-TNKEY$ 
5390 IF A$-"" THEN 5380 
5400 CLS: SCREEN 2 

5410 DRAWBM60, 30" : PRINT #l,"Sen(l 
80o+a) — Sen (a) " 

5420 DRAWBM6 1,30": PRINT #l,"Sen(l 
80o+a) — Sen (a) " 

5430 DRAW"BM60,40":PRTNT #l,"Cos(l 

809+a) — Cosía) " 

5440 DRAWBM6 1,40": PRINT *l,"Cos(l 
80Q+a)— Cos(a) " 

5450 DRAWBM60, 50": PRINT #l,"Tag(l 
809+a) «Tag (a) " 

5460 DRAWBM61 , 50" : PRINT #l,"Tag(l 

80o+a)-tag(a) " 

5470 DRAWBM60, 60": PRINT #l,"Sec(l 
80ofa)— Sec(a) " 

5480 DRAWBM61 .60" : PRINT *l,"Sec(l 
809+ a ) — Ser (a) " 

5490 DRAWBM60, 70" .-PRINT *1, "Cosec 
( 1 80p+o;) — Cosec (o ) " 
5500 DRAW" BM61, 70 ": PRINT #1 , "Cosec 
( 1 R09+a) —Cosec (a) " 

5510 DRAWBM60 , 80" : PRINT #1 . "Cotag 
(180Q+a)-Cotag(a) " 

5520 DRAWBM6 1, 80 ": PRINT #1 , "Cotag 
(.1 809+a) -Cotag (a) " 

5530 DRAWBM60, 180" : PRINT #l,"Puls 
a una tecla" ;A$ 
5540 A$-INKEY$ 
5550 IF A$-"" THEN 5540 
5560 CLS: SCREEN 0 
5570 LOCATE 1.1:PRINT "5 Caso:" 
5560 PRINT:PRINT"Consideremos dos 
ángulos, uno a y el que suma 360P c 
on él seria 3609-a" 
5590 LOCATE 10,22:PRINT "Pulsa una 
tecla" ; A$ 



5600 A$-INKEY$ 

5610 IF A$-"" THEN 5600 

5620 CLS: SCREEN 2 

5630 DRAW"BM60,30" .-PRINT. #1, "Sen (3 
60Q-CO— Sérica) " 

5640 DRAW"BM6i,30 : PRINT #l,"Sen(3 
60Q-a)— Sen (a) " 

5650 DRAWBM60, 40": PRINT #l,"Cos(3 
609-oc)-Cos(a) " 

5660 DRAWBM61, 40": PRINT #l,"Cos(3 
60Q-a)-Cos(a) " 

5670 DRAWBM60 , 50 " : PRINT #l,"Tag(3 
60Q-cO — Tag(a) " 

5680 DRAWBM61 , 50" : PRINT- #1 , "Tag (3 
609-00— Tag(oc) " 

5690 DRAWBM60, 60" : PRINT #l,"Sec(3 
609-a)-Sec(a)" 

5700 DRAW"BM61,60" :PRINT #l,"Sec(3 
609-a) -Sec (a) " 

5710 DRAWBM60, 70" : PRINT #1 , "Cosec 
(3609-a) — Cosec (a) " 
5720 DRAWBM61, 70": PRINT #1, "Cosec 
(3609-a)— Cosec (a) " 

5730 DRAWBM60 , 80" : PRINT #1, "Cotag 
(3609-a)— Cotag(a) " 

5740 DRAWBM61 ,80" : PRINT #1, "Cotag 
(3609-a)— Cotag(a) " 

5750 DRAWBM60, 180": PRINT #l,"Puls 

a una tecla" ;A$ 

5760 A$-INKEY$ 

5770 IF A$«"" THEN 5760 

5780 CLOSE 

5790 CLS: SCREEN 0 

5800 GOTO 190 

5810 'MENU PRINCIPAL 

5820 GOTO 120 

5830 1 CALCULO 

5840 CLS 

5850 INPUT "Qué ángulo deseas sabe 
r sus R.T. (expresado en grados)";C 
5860 S-SIN(C*3. 141592654#/180) 
5870 P-COS(C*3.141592654#/180) 
5880 T-TAN(C*3 . 141592654#/1 80) 
5890 AA-1/SIN(C*3. 141 592654*/ 180) 
5Q00 BB-l/COS (C*3 . 1 41592654*/ 1 80 ) 
5910 CC-1/TAN(C*3. 141592654*/1 80) 
5920 CLS: SCREEN 2:OPEN "GRP:"AS*1 
5930 DRAWBM30, 30" .-PRINT *1 , "Sen( 
";C; ")-";S:DRAW"BM31.30" :PRINT*1, " 
Sen(",-C; ")-";S 

5940 DRAWBM30 . 40" : PRINT *1 . "Cos( 
"; C ;")-"; P : DRAWBM3 1 , 40" : PRINT *1 , 
"Cos(";C; ")-";P 

5950 DRAWBM30, 50" : PRINT *1, "Tag ( 
";C; ")-";T:DRAW"BM31,50" :PRINT #1. 
"Tag(";C; ")-";T 

5960 DRAW"BM30,60":PRINT *3,"Sec(" 
; C ; " ) - f ; AA : DRAWBM31 , 60 " : PRINT*1 , " 
Sec(";C; ")-";AA 

5970 DRAW" BM30, 70 ".-PRINT *1, "Cosec 
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( " ; C ; " ) ; BB : DRAWBM31 . 70 " : PRTNT # 

1, "Cosec(";C: ")-";BB 

5980 DRAW"BM30,80" : PRINT #1 , "Cotag 

(";C; ")-";CC:DRAW"BM31,80" : PRINT # 

l,"Cotag(";C;")-";CC 

5990 DRAWBM60 , 180" : PRINT #l,"Puls 

a una tecla" ;A$ 

6000 A$-INKEY$ 

6010 IF A$-"" THEN 6000 

6020 CLOSE 

6030 CLS:INPUT "Quieres continuar, 
(s/n) ";E$ 

6040 IF E$-"S" OR E$»"s" THEN 5830 
6050 GOTO 120 
6060 CLS 

6070 ' FIN DEL PROGRAMA 

6080 LOCATE ll.,10:PRINT "Fin del p 

rograma" 

6090 FOR 1-1 TO 1000:NEXT 
6100 CLS 
6110 END 

6120 1 PRESENTACION 

6130 CLS : SCREEN 2 

6140 OPEN "GRP:"AS#1 

6150 DEFUSR1-&H41 ¡ A-USR1 (0) 

6160 ' LETRA "R" 

6170 CTRCLEÍ10, \ 0) ,5 , , 1 .5707963227 

#,3. 141592654# 

61 80 PRAW"BM5.9D30" 

6190 CIRCLE(8,40) ,3, , 3 . 141592654# , 

6.283185308* 

6200 DRAWBM11.40U15" 

6210 CTRCLE(14,25) . 7 . , . 7853981 635* 

.3. 141592654* 

6220 LTNE(16,25)-(19,43) 

6230 CIRCLE(21,42) ,2, ,4.712388981* 

, 6 283185308* 

6240 LINE(23,42)-(21,?4) 

6250 DRAW'BMl 1 .5R11" 

6260 CIRCLE(21,14) ,9, ,4.712388981* 

, 1 .570796327* 

6270 CIRCLEC15, 15) ,2 

6280 PATNTCll ,10) , 15 

6290 ' LETRA "A" 

6300 CJRCLE(37, 1 0) , 5 , , 1 .570796327* 

,3. 141592654* 

6310 DRAW :, BM32. 10032" 

6320 CTRCLE (35 ,41) ,3, .3.141592654* 

.6.283185308* 

6330 DRAW"BM38.41U15" 

6340 CJRCLE(40.28) ,2, ,0,3.1.4159265 

4* 

6350 DRAW"BM42 . 28D1 5" 

6360 CIRCLE(45,41) .3. , 3 . 141592654* 

,6.283185308* 

6370 DRAW"BM48.41U32" 

6380 CIRCLE(43.10) ,5. .0,1 .57079632 

7* 

6390 DRAW"BM43.5L7" 
6400 CIRCLE(40, 15) ,2 



6410 PAINT(38. 11) , 15 
6420 1 LETRA "Z" 

6430 CIRCLE(54,9) .3. ,1.570796327*, 
3. 141592654* 

6440 CTRCLE (54, 9) , 3 , , 3 . 1 41592654* . 

4.712389981* 

6450 &RJWflM54,l2R1ff" 

6460 CIRCLE(68, 12) , 3, ,4.712388981* 

,6 .283185308* 

6470 LINE(69, 14)-(53,40) 

6480 CTRCLE (56, 41) ,3, ,3.3161255792 

222*, 4. 712388981* 

6490 DRAW"BM56,44R20" 

6500 CIRCLE(76,41>,3, ,5.0614548314 

444*. 6. 283185308* 

6510 CIRCLE(76, 41) ,3, ,0,1.57079632 
7* 

6520 DRAW".BM76,38L13" 

6530 CIRCLE(67,39) ,5, ,2.6179938783 

333*, 3. 141592654* 

6540*LINE(63,37)-(79,8) 

6550 CIRCLE(78,9) ,3, , .7853981635*, 

1.570796327* 

6560 DRAW"BM78,6L24" 

6570 PAINT(55,10),15 

6580 1 LETRA "O" 

6590 CIRCLE(93,25) , 19 8/5 

6600 CTRCLE(93,25) ,5 
6610 PAINT(90,20) ,15 
6620 1 LETRA "N" 

6630 CIRCLE(110,10) ,3, ,0,3.1415926 
54* 

6640 DRAW"BM107, 10D30" 

6650 CIRCLEdlO, 40) ,3, ,3. 141592654 

*, 6. 283185308* 

6660 DRAW"BM113,40U10" 

6670 CIRCLE(116,30) ,2, , .3490658504 

4444*, 3. 141592654* 

6680 LINE(118,29)-(124,42) 

6690 CIRCLE( 126,40) ,3, ,4.363323130 

5556*-, 6.283185308* 

6700 DRAW"BM129,40U30" 

6710 CTRCLE(127, 1 0 ) , 2 , , 0 , 3 . 1 41 5926 

54* 

6720 f)RAW"BM124, 10D15" 
6730 LINE(124,25)-(114, 10) 
6740 PAINT(109,9) , 15 
6750 1 LETRA "E" 

6760 CTRCLE (135, 10) ,3, ,3 .570796327 

*, 3.4906585044444* 

6770 ORAW"BM132, 11D30" 

6780 CIRCLE(135,40) ,3, , 3. 141592654 

*, 5. 0614548314444* 

6790 DRAW"BM135,43R15" 

6800 CTRCLE (151, 39) ,4, ,4.712388981 

*, 6. 283185308* 

68.10 CTRCLE (151 ,39) ,4, ,0, 1 .5707963 
27* 

6820 DRAW"BM151,35L10" 

6830 CIRCLEjl41,33) ,2, ,1.570796327 



#,4. 712388381* 

6840 DRAW"BM141,31R7" 

6850 CIRCTJE(148,27) ,4, , 

#,6.283*1853084 

6860 CTR0LE(148.27) ,4, , 

27* 

6870 PRAW"BH142,23R5" 

6880 CTRCLE(142,21) , 2, , 

#.4.712388981* 

6890 DRAWBM142, 19R8" 

6900 CIRCLE(148,13) ,6, , 

#,6.283185308* 

6910 CTRCLE(148.13) ,6. , 

27# 

6^20 DRAWBM148.7L12" 
6930 PAINT(133, 13) , 15 
6940 1 LETRA "S" 
6950 CIRCLE(167, 17) , 10. 
7#, 4. 3633231305556* 
6960 DRAW"BM164,7R17" 
6970 CIRCLE (179, 12; ,5. , 
27* 

6960 CIRCLE<179,12) ,5, , 
6667*, 6. 283185308* ■ 
6990 DRAW"BM179,17L7" 
7000 CIRCLE(171,20) ,3, , 
*, 4. 1887902053333* 
7010 LINE(170,23)-(181, 
7020 LINE(163,27)-(171, 
7030 CIRCLE(179,37) ,7, , 
513333* 

7040 CIRCLE(179,37) ,7, , 
6667*, 6.283185308* 
7050 DRAW"BM180,44L15" 
7060 CIRCLE(165,39) ,5, , 
*, 4. 712388981* 
7070 DRAWBM165 , 34R7" 
7080 PAINTU67, 23) ,15 
7090 1 LETRA "T" 
7100 CIRCLE-(50,70) ,5 
,4.712388981* 
7110 r>RAW ,, BM50.65R25" 
7120 CIRCLE(75,70) ,5, , O 
7# 

7130 CIRCLE(75.70) .5. .4 
,6.283185308* 
7140 PRAW"BM50,75R9" 
7150 DRAWBM75 , 75L8" 
7160 DRAW"BM59.75D16" 
7170 DRAW"BM67,75D16" 
7180 rTRCT,E(63,91) ,4, , 3 
,6.283185308* 
7190 PATNT(58,74) , 15 
7200 1 LETRA "R" 
7210 CTRCI.E(88,70) ,5, , 1 
,3. 141592654* 
7220 DRAW"BM83.70D22" 
7230 CTRCLE(86,91) .3, ,3 
,6.283185308* 
7240 DRAWBM89 . 91U7" 



4.712388981 
0,1 .5707963 

1.570796327 

4.712388981 
0.1 .5707963 



,1.57079632 

0,1 .5707963 
5.235987756 

1.570796327 

30) 

33) 

O, 1.0471975 
5.235987756 

1 .570796327 



1 .570796327* 

0.1. 57079632 
4. 71 2388981* 



.1415926-54* 



570796327* 
141592654* 



7250 CTRCLE (91 .86) ,2, .0.3.14159265 
4* 

7260 LTNE(93,86)-(96,94) 

7270 CIRCLE(98,93) ,2, ,4.712388981* 

.6.283185308* 

7280 LINE( 100, 93) -(98, 82) 

72^0 DRAW ,, BM88.65R9" 

7300 CIRCLE(98,73) ,8, , O , 1 . 57079632 

7* 

7310 CTRCLE(98.73) ,8, .4.712388981* 

,6. 28318308* 

7320 CTRCLE í 93 , 74) ,2 

7330 PATNT(84,70) . 15 

7340 ' LETRA "I" 

7350 CIRCLE(114,70) ,5, ,0,3.1415926 
54* 

7360 DRAW"BM109,70D21" 

7370 DRAW"BM119,70D21" 

7380 CIRCLE(114,90) ,5, ,3.141592654 

*, 6. 283.185308* 

73^0 PAINT(110,70) ,15 

7400 ' LETRA "G" 

7410 CIRCLE(128,70) ,5, ,1.570796327 

*, 3. 141592654* 

7420 DRAW"BM123,70D21" 

7430 CIRCLE ( 128 , 89 ) , 5 , , 3 . 141592654 

7440 DRAW"BM128,94R15- 

7450 CTRCLE (143, 89) ,5, ,4.712388981 

#,6.283185308* 

7460 BRAWBM148.89U10" 

7470 CIRCLE ( 146 , 79 ) , 2 , , O , 1 . 5707963 

27# 

7480 DRAW"BM146,77L10" 

7490 CIRCLE(136, 79) ,2, ,1.670796327 

#,4 .712388981* 

7500 DRAW"BM136,81R7" 

7510 CTRCLE(143.83) ,2, ,0,3.1415926 

54# 

7520 CIRCJ.F(143,83) .2, ,4.712388981 

#,6. 283185308* 

7530 DRAW"BM143.85T,9" 

7540 CIRCLE(133,82) , 3,, 3 . 141592654 

# r 4.71 2338981* 

7550 DRAW"BM130,82U7" 

7560 CIRCLE (132/75) .2', , 1 .570796327 

*, 3. 141592654* 

7570 DR»W M BM134,73R11" 

7580 CIRCLE (145, 68), 4,, O, 1.5707963 

27* 

7590 CIRCLE(145,68) ,4, ,4.712388981 
#,6 . 283185308* 
7600 DRAW-BM-MS^L^" 
7610 p A T. NT ( 1 4 5 , 6 6 ) , 1 5 
7620 TROLE (160, 90) ,5, , , ,4/3 
7630 PAINT(161,91) , 15 
7640 DRAWBM 78 . 1 80 " i PRTNT #l."(c) 
Arthur " 

7650 DRAW'BM 79 . 1 80" : PRINT #1 , " (c) 
Arthur" 
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7660 DEFUSR2-&H44 : A-USR2 ( 0 ) 
7670 FOR 1-1 TO 3000:NEXT 
7680 CL05E 
7690 CT,3:S CREEN 0 

7700 tnput "Quieres instrucciones 
(s/n) " :C$ 

771.0 TF Ct-H" OR C$«"r." THFN 7820 
7720 CLS 

7730 1 INSTRUCCIONES 
7740 PRINT"Est e programa trata de 
el tema de 1 as Razones Tr igonornétr 
icas . 

7750 PRINT'Como podrás ver tien* \ 
nos amplios menas, que en ellos pod 
ras encontrar : " 

7760 PRINT'Teor la y cálculo. En la 
parte de teoría podras elegir entr 
e 6 opciones. 

7770 PRTNT"En la parte de cálculo 
podras calcular el seno, coseno y t 
angentp, señante, cosecante y cotang 
ente . " 

7780 PRINT"Durante el transcurso d 



Pulsa uní ttola 





el programa aparecerá R.T.,que sig 

ni f i ra Razones Trigonométricas" 

7790 LOCATE 1.0, 22 :PRINT"Pulsa una 

t*r-la" ; A$ 

7800 A$-INKEY$ 

7310 IF THEN 7800 

7820 RETURN 



Test de listados 



.i utilizar el Test de Listados que ofrecemos al final de cada programa, recordamos que previamente hay que cargar en el 
Fiador el programa ile Manhattan Transfer Test de Listados, que ptxléis adquirir en nuestra redacción <» mediante el cupói 
ile nuestra sección MSX ( lub ile Cassettes. 
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7770 


- 50 


7420 


- Q7 


7540 


-1.07 


7660 


-198 


7780 


-157 


7430 


-111 


7550 


- 71 


7670 


- 65 


7790 


- 67 


7440 


-125 


7560 


-3 65 


7680 


-180 


7800 


- 64 


7450 


-243 


7570 


-115 


7690 


-175 


7810 


-161 


7460 


-129 


7580 


-234 


7700 


- 51 


7820 


-142 


7470 


-244 


7590 


-192 


7710 


- 4 TOTAL 


90244 


7480 


-115 


7600 


-117 


7720 


-159 






7490 


-173 


7610 


-119 


7730 


- 58 








7620 


- 96 


7740 


-106 







SUSCRIBETE A VS¡ 

Suscribiéndote no sólo tienes la seguridad de tener todos los meses tu 
MSX ( :LUB DE PROGRAMAS en tu casa sino que recibirás 12 
números pagando sólo 10 



BOLETIN DE SUSCRIPCION MSX CLUB DE PROGRAMAS 



Nombre y a 
Calle ... 
Ciudad 

D. Postal Teléfono 

Deseo suscribirme por doce números a la revista MSX CLUB DE PROGRAMAS a partir del número 

que pago adjuntando talón al portador barrado a: C/. Roca i Batlle, 10-12 - 08023 Barceloría 

Tarifas: España por correo normal Ptas. 3.500, — 

Europa por correo aéreo Ptás 6.250, — 

América por correo aéreo USAS 60, — 

| Importante: Colocar en el sobre: Departamento Suscripciones MSX CLUB. NO SE ADMITE CONTRAREEMBOLSO. 

i 

50 



N.° 




¡Sfaffi *^&$£t%t :::^r^¿"rsT^;r::::::: g^?¿ ^ r ¿ j8aft !^£:¿^/<£^SL2£ OAMI 
Si quieres recibir por correo certificado estas cassettes garantizadas recorta o copia este 



r 



SCTBS 

y envíalo hoy mismo: 



Nombre y apellidos 

Dirección 

Población 

□ KRYPTON Ptas. 500,- 

□ U BOOT Ptas. 700 - 

□ LORD WATSON Ptas. 1.000- 

□ LOTO Ptas. 900- 

□ EL SECRETO DE LA PIRAMIDE Ptas. 700,— 

□ STAR RUNNER Ptas. 1.000.- 



| Gastos de envío certificado por cada cassette 

i un descuento del 10% 



CP 

□ TEST DE LISTADOS 

□ HARD COPY 

□ MATA MARCIANOS 

□ DEVIL'S CASTLE 

□ MAD FOX 

□ VAMPIRO 



Tel.: 



Ptas. 70- Remito talón bancario de Ptas. 



Ptas. 500,- 
Ptas. 2.500.- 
Ptas. 900.- 
Ptas. 900 — 
Ptas. 1.000- 
Ptas. 800 — 



ATENCION: Los suscriptos 
10-12 BAJOS. 08023 BARCEL( 



□ SKY HAWK p, as . tooo.- 

□ TNT Ras. 1 000 - 

□ QUINIELAS Ptas. 1.000 - 

□ WILCO Ptas. 900,- 

□ GAMES TUTOR Ptas. 650,- 

A la orden de Manhattan Transfer. S. A. 
en el sobre MSX CLUB DE CASSETTES. ROCA I BATLLE, 



M ESTRAS CASSETTES NO SE VENDEN EN QUIOSCOS. LA FORMA DE ADQl IRIRLAS ES SOLICITANDOLAS A NUESTRA REDACCION ¡NI 



CALL XXVIII. 



.Por Joaquín López, 



DUPLICACION 
DE DISCOS 



Este mes hemos construido 
una rutina para duplicar discos 
que facilita la obtención de 
copias de seguridad. 



MSXDOS 

El sistema operativo de disco de los 
MSX (MSXDOS) se entrega a los 
usuarios sin ficheros anexos con utili- 
dades. En contraste con el MS DOS, 
que es el sistema operativo de disco de 
muchos ordenadores de 16 bits, el 
MSXDOS llega completamente desnu- 
do. Tanto el MSXDOS como el MS 
DOS han sido desarrollados por la 
misma compañía, Microsoft. 

Quienes hayan manejado un ordena- 
dor con MS DOS (un IBM PC o un 
compatible, por ejemplo) sabrán de lo 
cómodo de disponer de subdirectorios, 
de utilidades para la verificación de 
discos y recuperación de datos daña- 
dos, de la posibilidad de reasignar 
dispositivos, comparar ficheros, listar 
en la impresora mientras se trabaja en 
otra cosa, copiar la pantalla, etiquetar 
los discos, duplicar discos enteros u 
ordenar datos alfabéticamente. 

Bien es cierto que las posibilidades 
del MSXDOS se encuentran limitadas 
por el hardware (el pequeño tamaño de 
su memoria y la relativa lentitud de su 
microprocesador, entre otras restric- 
ciones). Sin embargo, no le iría mal que 
se entregara acompañado de algunas de 
las utilidades con las que cuenta el MS 
DOS. 

Para cubrir una de las carencias 
importantes del MSXDOS, este mes 
hemos contruido una rutina que realiza 
lo mismo que el comando DISKCOPY 
del MS DOS, es decir, copia todos los 
sectores de un disco en otro, a fin de 
obtener un duplicado "al carbón" del 
original. 

DISKCOPY 

La rutina "DISKCOPY" está cons- 
truida para ser ejecutada desde el 
MSXDOS. El nombre del fichero eje- 
cutable deberá ser, por tanto,DISK- 
COPY.COM. 

Para usarla hay que teclear "DISK- 
COPY" en el prompt del sistema 
seguido de la unidad fuente y de la 




unidad destino. Por ejemplo: 

A> DISKCOPY A: B: 

El comando anterior hará copiar el 
disco de la unidad A: en el disco de la 
unidad B:. Huelga decir que en los 
sistemas con una única unidad de disco 
la unidad física B : es sustituida por un 
disco. El MSXDOS se encarga de 
emular la unidad B: solicitando el 
cambio de discos, así que bastará con 
seguir las instrucciones. 

La rutina emplea toda la memoria 
central disponible bajo MSXDOS, es 
decir 64K menos el espacio que usa el 
sistema. Para agilizar la transferencia, 
se trabaja con pistas completas (9 
sectores). Cada lectura y cada escritura 
se hace en bloques de diez pistas (90 
sectores), que ocupan 45Kb (90x512). 

Amén del buffer de 45Kb destinado 
a la copia, se han reservado 4,5Kb 
como tampón temporal para la transfe- 
rencia directa con el disco. Ello es así 
para eludir el problema que representa 
que el controlador de disco no sea 
capaz de intercambiar información con 
la página 1 de memoria (direcciones 
4000H-8000H). Los datos se graban y 
se leen desde este tampón situado en la 



página 0 y se mueven en bloques de 
4,5Kb al buffer de 45Kb. La transfe- 
rencia es tan rápida (unos 250 milise- 
gundos) que el motor de la unidad de 
disco no pierde las revoluciones de 
régimen y la siguiente pista se transfie- 
re sin demora. 

DESCRIPCION DE LA RUTINA 

La rutina empieza leyendo los bytes 
5CH y 6DH, que es donde el sistema 
guarda los códigos de las unidades 
fuente y destino. Si alguno de ellos es 
cero, no se ha especificado algunas de 
las unidades y aparece el error "Se han 
de especificar las unidades fuente y 
destino". 

Si se han indicado las dos unidades, 
se muestra un mensaje parecido a 
"Pulsa una tecla para copiar A: en B:" 
(líneas 190-210). 

A continuación se espera a que el 
operador inserte el disco a copiar y 
pulse una tecla (líneas 210 y 220), y se 
fija la dirección de transferencia para 
que apunte al tampón (DMA) de 
4.5Kb (líneas 240-260). 

Se intenta leer el sector cero del 



52 




disco fuente (líneas 260-32-0), produ- 
ciéndose el error "Nombre de unidad 
incorrecto" si la unidad especificada no 
está conectada. 

El byte 1 AH del sector cero indica el 
número de caras del disco. Este dato 
sirve para completar el siguiente men- 
saje que aparecerá en la pantalla: "El 
disco fuente es de ? cara(s). La copia se 
realiza en ese formato". Todas estas 
operaciones se, realizan con las líneas 
340-400. 

En este punto, el operador conoce el 
formato del disco fuente, ¡pero el 
sistema operativo no!. Cuando se reali- 
za una operación de lectura o escritura 
en el directorio (accediendo a un fiche- 
ro, por ejemplo), el bloque de paráme- 
tros del disco (DPB) es copiado en la 
RAM. La escritura o lectura directa de 
sectores no fuerza la copia del DPB y 
el sistema lee el DPB del último disco 
con el que se ha trabajado. Esta pecu- 
liaridad es la causante de la aparición 
de muchos problemas, en particular 
cuando se intenta acceder directamente 
a sectores en discos de una sola cara. El 
DPB obsoleto indica que el disco es de 
dos caras y el sistema intenta escribir 
sectores en la cara que no ha sido 
formateada. Como no los encuentra, 
aparece un mensaje de error de disco. 
En las líneas 410-440 se hace una 
llamada a la función del MSXDOS aue 
proporciona información sobre el dis- 
co (número de sectores, espacio libre, 
punteros al DPB, etc.) y esto se apro- 
vecha para saber el número de sectores 
del disco fuente (este dato se usa más 
adelante), a la vez que se fuerza la 
actualización del DPB. 

Las líneas 450-1050 conforman el 
bucle principal del programa. Se em- 
pieza comprobando el número de caras 
del disco fuente para realizar 8 ó 16 



interaciones, según se trate de un disco 
de una o dos caras. Téngase presente 
que en cada paso se copian 10 pistas (90 
sectores) que multiplicados por 8 ó 16 
completan un disco (720 ó 1440 secto- 
res). Así pues el número de veces que 
los usuarios de una sola unidad debe- 
rán intercambiar los discos será de 8 ó 
16 (multiplicados por dos). 

A lo largo de todo el bucle principal, 
DE es un puntero que señala al número 
de sector que se está copiando (de 0 a 
719 ó 14-39). HL es el puntero que 
marca la dirección del buffer a donde 
se envían los datos. El registro B se 
emplea como contador en todos los 
bucles. 

Lo más interesante del bucle princi- 
al es que antes de escribir el primer 
loque de 10 pistas en el disco destino 
se hace una llamada a SETDPB. Esta 
rutina llama a su vez a la función del 
MSXDOS aue recaba información del 
disco. La llamada sirve para que se 



actualice el DPB del disco destino y 
para conocer el número de clusters, a 
fin de poder comparar los discos fuente 
y destino. Si no son iguales, la copia se 
anula y aparece el error "Los discos 
fuente y destino tienen distintos for- 
matos". 



PUESTA EN MARCHA 

Los aue opten por teclear el carga- 
dor de líneas DATA no tendrán mu- 
chas dificultades. El pequeño progra- 
ma cargador incluye una línea que 
pone los códigos en la memoria a partir 
de la dirección 9F52H hasta la 
A15AH. La rutina tiene, por tanto, 521 
bytes. 

El formato binario del MSX-BASIC 
(el que se obtiene con BSAVE) no 
es válido para ejecutar desde el 
MSXDOS, ya que este tipo de ficheros 
incluyen una cabecera con un prefijo y 
las direcciones de inicio, final y ejecu- 
ción. Los ficheros del tipo "COM" no 
deben llevar cabecera, puesto que se 
cargan siempre en la misma posición de 
memoria (100H). Para grabar el conte- 
nido de las direcciones de memoria 
(100H). Para grabar el contenido de las 
direcciones de memoria, en las que se 
encuentran los códigos de las instruc- 
ciones de la rutina, en formato 
".COM", es preciso abrir un fichero 
secuencial. Las líneas 80 a 100 del 
cargador realizan esta tarea. Por cierto, 
la longitud del fichero será de 522 
bytes, uno más que la rutina, debido a 
que el sistema incluye un código de 
final de fichero (1AH) antes del cierre. 
Ello no tiene repercusiones en el buen 
funcionamiento de la rutina. 

Los que prefieran teclear el üstado 
fuente pueden tener dificultades si su 
ensamblador no trabaja con la RAM de 




las páginas O y 1. No habrá problemas, 
empero, si se usa un ensamblador que 
funcione bajo el MSXDOS. 

El mejor ensamblador para MSX, y 
el más difundido, GEN, si soporta el 
uso de las primeras 32Kb de memoria. 
Si tienes instalado a GEN en las 
primeras direcciones, (la primera válida 
es la 80H), haz lo siguiente: compila el 
programa con la opción 52 y da un 
tamaño de 30000 para la tabla de 
símbolos. De esta forma harás que el 
código ejecutable se coloque justo des- 
pués del texto y de la tabla. A conti- 
nuación, teclea X y aparecerán las 
direcciones de inicio y final del texto 
(por ejemplo: 2131 2A20). Suma el 
segundo dato (el final del texto) a 
30000 (el tamaño de la tabla) y añade 2. 




El resultado te indicará la dirección 
donde empieza el código ejecutable. 
Sólo tienes que grabarlo usando las 
líneas 80 a 100 del cargador, actuali- 
zando la dirección de inicio. La si- 
guiente línea es la que se empleó para 
calcular el inicio del código en el 
programa original: 

PRINT HEX$ (&H2A20 + 30000 
+ 2) 

El resultado fue de &H9F52. 

No te preocupes mucho si la direc- 
ción de inicio del código es algo 
diferente a la obtenida en el programa 
original. La omisión de un simple 
carácter de un comentario al teclear el 
listado fuente hará variar el tamaño del 
texto y, por ende, la dirección de 
inicio. 



LISTADO ENSAMBLADOR 



10 lltttt DI8KCQPY ntm 


240 


LD DE, DMA 


470 


LD (TEST), A 


20 iCopia un disco cnpltto. 


250 


LD CHA 


480 


POP AF 


30 fCnrre b» 


joHB) 




260 


CALLEOOS 


490 


LD B,8 


40 | 






270 


LD DE,0 


500 


DEC A 


90 


QR6 


«100 


280 


LD HL,(I5C) 


510 


JR Z,SINBLE 


60 | 






290 


DEC L 


520 


LD Bi 16 


70 


LD 


(STAOÜ,SP 


300 


LD H,l 


530 SIMELES 


LD DE,0 


80 


LD 


A,<#9C) 


310 


LD C,#2F 


540 LOOP: 


PUSH BC 


90 


0R 


A 


320 


CALL BDOS 


550 


LD HL,BUFFBt 


100 


JP 


Z,EJWESP 


330 


JP NZfERRDRV 


560 


PUSH DE 


110 


LD 


C,t2F 


340 


LD MOHMIA) 


570 


LD B, 10 


120 


ADD 


A,"A"-1 


350 


PUSH AF 


580 L0QPRS 


PUSH DE 


130 


LD 


(DRVS0UR),A 


360 


ADD A,'0 B 


590 


PUSH HL 


140 


LD 


A,(#6C) 


370 


LD (HEADS),A 


600 


LD HL,(I5C) 


150 


OR 


A 


380 


LD DEyFESHEAD 


610 


DEC L 


160 


JP 


Z,ERfi£SP 


390 


LD C,I9 


620 


LD H,9 


170 


ADD 


A,"AM 


400 


CALL BDOS 


630 


LD C,I2F 


180 


LD 


(DRVDEST)fA 


410 


LD DE,(#5C) 


640 


CALL B006 


190 


LD 


DEilESINS 


420 


LD CfflB 


690 


POP DE 


200 


LD 


C,«9 


430 


CALL BDOS 


660 


LD A,B 


210 


CALI BDOS 


440 


LD (CLUST),DE 


670 


LD BC,9t512 


220 


LD 


C,I7 


450 {Inicio copia 


680 


LD HLfDHA 


230 


CALI BDOS 


460 


XQR A 


690 


LDIR 



54 



700 


LD BC,9 


1050 


RET 


1400 | 




710 


POP HL 


1060 5 




1410 HESDRV: 


DEFB 12,7 


720 


ADD HLiBC 


1070 jSETDPB ejecuta una vez, justo 


1420 


DEFH -Mrtre de unidad i 


730 


LO B,A 


1080 {antes de grabar el le bloque. 


ncorrectol' 




740 


EX DE,HL 


1090 SETDPB: 


PUSH BC 


1430 HESESP: 


DEFB 12,7 


750 


DJNZ LOQPR 


1100 


PUSHHL 


1440 


DEFH "Se han de especifi 


760 


POP DE 


1110 


INC A 


car las unidadc 




770 


LD B, 10 


1120 


LD (TEST) , A 


1450 


DEFB 13,10 


780 


LD HLjBUFFER 


1130 


LD DE, (#6C) 


1460 


DEFH 'fuente y destino*' 


790 LOOP*: 


PU5H DE 


1140 


LD C,tlB 




900 


LD A» (TEST) 


1150 


CALL BDOS 


1470 NESTOR: 


DEFB 12,7 


810 


GR A 


1160 


LD HL, (CLUST) 


1480 


DEFH 'Los discos fuente 


820 
830 


CALL ZiSETDPB 


1170 


SBC HL,DE 


y destino tienen' 


LD AfB 


1180 


JR NZ,ERRFOR 


1490 


DEFH ' distintos foraato 


840 


LD BC,9t512 


1190 


POP HL 


sf.- 




850 


LD DE, DMA 


1200 


POP BC 


1500 


DEFB 13,10 


860 


LDIR 


1210 


RET 




DEFB 12 


870 


LD BiA 


1220 | 




1520 


DEFH 'Pulsa una tecla pa 


880 
890 


POP DE 


1230 BDOS: 


PUSH HL 


ra copiar 1 




PUSH HL 


1240 


PUSH BC 


1530 DRVSOUR: 


DEFB 0 


900 


LD H, (t6C) 


1250 


CALL IF37D 


1540 


DEFH "* en " 


910 


DEC L 


1260 


POP BC 


1550 DRVDEST: 


DEFB Oí •!■,■$■ 


920 


LD H,9 


1270 


POP Hi 


1560 HESHEADi 


DEFB 13,10 


930 


LD C,I30 


1280 


OR A 


1570 


DEFH "El disco fuente es 


940 


PUSH DE 


1290 


RET 


1580 HEADSt 




950 


CALL BDOS 


1300 ! 


DEFB 0 


960 


POP DE 


1310 EfflESP: 


LD DEfNESESP 


1590 


DEFH " cara(s)." 


970 


JR NZiERRDRV 


1320 ERROR: 


LD C,#9 


1600 


DEFB 13,10 


980 


LD HL,9 


1330 


CALL BDOS 


1610 


DEFH -La copia se realiz 


990 


ADD HLiDE 


1340 


LD SP,(STAOO 


a en ese foraato.*" 


1000 


EX DE,HL 


1350 


RET 


1620 STACK» 


DEFH 0 


1010 


POP HL 




LD DE,H£SORV 


1630 CLUST: 


DEFH 0 


1020 


DJNZ LOOP* 


1370 




1640 TEST» 


DEFB 0 


1030 


POP BC 




LD DE,HESFOR 


1650 DMA» 




1040 


DJNZ LOOP 


1390 


JR ERROR 


1660 BUFFERt 


EOU 9tS12+DHA 



CARGADOR EN BASIC 


ío 'itttt DiSKCOPY mm 

15 ■ 

20 FOR X1H9F52 TO tHA15A:REtf> V* 
30 POKE X,VAL("IH"4VI)iS-S*PEEK(X) 
40 NEXTUF SO45003! THEN BEEP:CLS:PRINT 
-HAY UN ERROR-XEND 

50 ílSiPRINT'Pulsa una tecla para grabar 
■ 

60 PRINT-DISKCOPY.COH- 

70 Zt*INKEYIiIF Z#»"THEN70 

80 OPEN "diskcopy.coa" FOR OUTPUT AS ti 

90 FOR X«tH9F52 TD 1HA15A 

100 PRINTI1,CHRI(PEEK(X)),-:NEXT 

110 END 

120 DATAED,73,04,03,3A,5C,00,B7,CA,EF,01 
,0E,2F,C6,40,32,B3,O2,3A,6C,00,B7,CA,EF, 
01,C6,40,32,B9,02,11,96,02,OE,09,CD,E6,0 
1,OE,07,CD,E6,01,11,09,03,OE,1A,CD,E6,01 
, 11,00,00, 2A,5C,00,2D,26,01,OE,2F,CD,E6, 
01 

130 DATAC2,FC,01,3A,23,03,F5,C6,30,32,D4 


, 02, 1 1 , BC, 02, OE, 09, CD, E6, 01 , ED, 5B, 5C, 00, 
OE, lB,CD,E6,01,ED,53,06,03,AF,32,Oe,03,F 
1,06,08, 3D,2B,02,06,10,11,00,00,C5,21,09 
,15,D5,06,OA,D5,E5,2A,5C,00,2D,26,09,OE, 
2F 

140 DA»CD,E6,01,D1,78,01,00, 12,21,09,03 
,ED,BO,01,09,00,E1,09,47,EB,10,EO,D1,06, 
OA, 21 ,09, 15,D5,3A,08,03,B7,CC,CD,01 ,78,0 
1 , 00, 12, 1 1 , 09, 03, ED, BO, 47, DI , E5, 2A, 6C, 00 
, 2D, 26, 09, OE, 30, 05, CD, E6, 01 , DI , 20, 3B, 21 , 
09 

150 DATAOO,19,EB,E1,10,D5,C1,10,A5,C9,C5 
,E5,3C,32,08,03,ED,5B,6C,00,OE,1B,CD,E6, 
01,2A,06,03,ED,52,20,1E,E1,C1,C9,E5,C5,C 
D,7D,F3,C1,E1,B7,C9,11,24,02,0E,09,CD,E6 
,01,ED,7B,04,03,C9,11,06,02,1B,F1,11,5B, 
02 

160 DATA18,EC,X,07,4E,6F,6D,62,72,65,20 
,64,65,20,75, 6E, 69, 64, 61, 64, 20, 69, 6E, 63, 
6F,72,72,65,63,74,6F,24,0C,07,53,65,20,6 
8,61,6E,20,64,65,20,65, 73, 70,65,63, 69,66 


,69,63,61, 72,20,6C,61, 73,20, 75,6E,69,64, 
61 

170 DATA64,65,73,0D,0A,66,75,65,6E, 74,65 
,20,79,20,64,65, 73,74,69,6E,6F,24,«,07, 
4C,AF,73,20,64,69,73,63,6F,73,20,66,75,6 
5,6E,74,65,20,79,20,64,65,73,74,69,6E,6F 
,20,74,69,65,6E,65,6E,20,64,69,73,74,69, 
6E 

180 DATA74,6F,73,20,66,6F,72,6D,61,74,6F 
, 73, 24, 2E, OD, OA, X, 50, 75, 6C, 73, 61 , 20, 75, 
6E,61,20,74,65,63,6C,61,20, 70,61,72,61,2 
0,63,6F,70,69,61,72,20,00,3A,20,65,6E,20 
,0O,3A,24,0D,OA,45,6C,20,64,69,73,63,6F, 
20 

190 DATA66,75,65,éE,74,65,20,65,73,20,64 
,65,20,00,20,63,61,72,61,2B,73,29,2E,OD, 
0A,C,61,20, 63, 6F,70, 69,61,20, 73, 65,20,7 
2,65,61,6C,69,7A,61,20,65,6E,20,65, 73,65 
,20,66,6F,72,6D,61,74,6F,2E,24, 00, 00,00, 
00 

200 DATAOO 



Los interesados en participar en 
esta sección pueden enviar sus tru- 
cos y pokes a: 

Sección - Trucos y pokes. 
Roca i Batlle, 10-12, bajos 
08023 Barcelona 

Todos los trucos publicados en 
este apartado recibirán un video jue- 
go comercial a vuelta de correo. 

Advertencia: últimamente esta- 
mos recibiendo en redacción una 
gran cantidad de trucos y pokes 
aparecidos anteriormente, tanto en 
nuestras revistas como plagios de 
otras publicaciones: a todos estos 
hay que advertirles que se abstengan 
de remitirnos cartas a esta sección. 



ADOLFO GONZALEZ 
(BARCELONA) 



CAPITAN SEVILLA, CAMELOT WARRIORS. 
DYNAMITE DAN 



-Si estás transformando en Capi- 
tán Sevilla y disparando matas a 
todos los enemigos de una pantalla 
verás como nuestro héroe coge una 
superfuerza especial. Esta hace que 
corra más de lo normal durante un | 
tiempo. 

-He descubierto que para quitar 
la demostración del juego Camelot 
Warriors tienes que pulsar Fl. Tam- 
bién sirve para anular la partida. 

-En el Dynamite Dan si ves que 
estás obligado a que te maten una 
vida o dos, si tocas a dos bichos casi 
a la vez sólo te restará una vida y 
podrás continuar tranquilamente. 




FRANCISCO GALVEZ 
(CORDOBA) 



En la primera fase debemos de 
saltar las minas y pegarnos un poco 
-no mucho- a la que hemos saltado. 

Para poder matar a los pulpos de I 
la tercera fase más fácilmente dejare- 
mos la barra o el botón del joystick 
pulsado hasta que veamos fuego en 
los dos lanza-misiles. Al soltar la | 
barra saldrán dos misiles a la vez y f 
duplicarán su poder destructivo. 




DANIEL PADILLA ROLDAN 
(MALAGA) 



Doce etapas o áreas del juego 
I comentadas paso a paso, de las 
cuales la cuarta y la octava son las 
más difíles. 

1. Esta primera fase está com- 
puesta de un recorrido bastante fácil 
y de tres bases que deberemos des- 
truir para poder pasar de nivel. 
Aprovecho para hacer referencia al 
interesante efecto utilizado para pa- 
sar de una fase a otra. 

2. La segunda fase es más larga I 
que la primera. Tiene una sola base 
para destruir. El arma número siete 
va bien en estos dos niveles. 

3. La tercera etapa es una át las 
más fáciles del juego. Consta de un 
recorrido más largo de lo normal y 
de tres bases. En esta fase hace su 
primera aparición el hada que, una 
vez cogida, destruye automática- 
mente la siguiente base. También 
cabe destacar la cara de color utiliza- 
da para aumentar hasta los topes el 
arma que dispongamos con sólo 
dispararle varias veces. En esta fase 
es recomendable el arma número 5 
para hacerla servir contra la cara de 
color. 

4. Esta fase es, a mi parecer, una 
de las más difíciles del recorrido del 
juego. Consta de tres bases bastante 
difíciles y un recorrido igual de j 




parecido. Si aún conservamos el 
arma número 5 de la fase anterior no 
tendremos graves inconvenientes 
para pasar ésta. Os aviso de la 
existencia de un hada en el primer 
cuadrado dorado que aparezca por 
la izquierda. Disparadle al filo pos- 
terior hasta que surja. 

5. Esta etapa tiene unos gráficos 
muy vistosos y originales; y consta 
de dos bases y un recorrido plagado 
de unos enemigos muy molestos 
que salen desde abajo para unirse a 
nuestra altura. Hay otra cara de 
color cuando estemos luchando con 
el enemigo al que le rebotan las 
balas. 

6. Este nivel es muy original en 
cuanto a grafismo se refiere. Su 
escenario se compone de columnas 
vistas desde arriba con un ligero 
grado de inclinación. Tiene dos ba- 
ses y un recorrido normal, sin mu- 
chas dificultades. 

7. Este nivel no se diferencia 
mucho del primero y no tendremos 
que hacer mucho esfuerzo para so- 
brepasarlo. Tiene dos bases y un 
recorrido normal. 

8. Esta fase es la más espectacular 
y, por consiguiente, la más difícil. El 
fondo parece fuego y su recorrido es 
bastante dificultoso. Aquí hacen su 
primera aparición las mariquitas, 
que son unos bichos que no se 
pueden matar con nada excepto 
tocándolas con la nave -un contacto 
muy hado a la hora de destruir 
enemigos posteriores-. Es aconseja- 
ble en este nivel que os mováis de 
derecha a izquierda, y viceversa, sin 
preocuparse de estos bichos. 

9. Este área aunque es extensa la 
podremos pasar con un poco de 
habilidad. Tiene tres bases norma- 
les. 

10. Esta décima etapa se parece a 
la anterior. Tiene dos bases y un 
recorrido más corto que el noveno. 

11. El decorado de este nivel 
consta de unas tuberías de color 
naranja. Si llevamos un buen arma la 
pasaremos sin más problemas, ya | 
que tan solo tiene una base. Pode- 



por J.C. Roldán 



mos destacar los tres enemigos gran 
des -les rebotan los disparos-. 

12. La doceava y última área es 
más fácil de lo que debería ser. Por 
ser la última tiene tres bases de gran 
vistosidad. Para terminar la última 
base deberemos destruir los dos 
cerebros de los lados y luego el del 
centro. De lo contrario nunca aca- 
baremos. 

-Una sorpresa más: el juego con- 
tiene un truco un tanto especial; si 
en cualquier momento de la partida 
pulsáis SELECT y sin soltarlo pul- 
sáis STOP podréis, mediante las 
teclas del cursor, cambiar los colores 
de todo el juego, desde los sprites al 
fondo más rebuscado. 



JOSE LUIS POLO PEINADO 
(GRANADA) 




Cuando aparece la presentación 
de Konami pulsamos cursores iz- 
quierda y derecha a la vez. Sin 
soltarlos pulsamos SELECT y la 
(etra Y. El juego comenzará con 
invisibilidad temporal. Cada vez 
que se agota basta con pulsar SE- 
LECT de nuevo. 

Si hacemos lo mismo pero pulsan- 
do N en vez de Y empezaremos con 
veinticinco vidas. 



ALEJANDRO RAPALLO 
(CORDOBA) 



OPERATION WOLF, SOL NEGRO, PSYCHO PIG 
UXB, COLISEÜM 



Cargador de inmunidad para 
Operation Wolf 
10 BLOAD "CAS:" 
20 POKE &H9344, 205 
30 FOR N=&H9347 TO &H934B: 
READ A: POKE N, A: NEXT N 
40 DEFUSR=&H9200 
50 X=USR(0) 

60 DATA 175, 50, &HBB, &HA3, 
&HC9 

Inmunidad para Sol Negro 



Pulsar simultáneamente F5- 1-6-9- 
STOP y, manteniendo todas las | 
teclas pulsadas, soltar STOP y vol- 
verlo a pulsar. 

Psycho pig uxb 
Si nos quedamos agachados conti- 
nuamente, las bombas no nos harán I 
daño y los demás contrincantes se | 
matarán entre ellos. 

Coliseum 
Si en las curvas nos bajamos abajo I 
del todo no nos chocaremos contra 
nada. Y si nos subimos un poco más 
-sin llegar al centro- en las rectas | 
tampoco chocaremos. 

ALBERTO BENEIT ROCHES 
(BARCELONA) 



En el París-Dakar para participar 
en cualquier etapa o fase sin haber 
podido conseguir el código tendre- 
mos que hacer lo siguiente: 

1. Apretar 0 para jugar. 

2. Elegir la opción de "Empezar I 
carrera anterior*. 

3. Tendremos que introducir 12 
códigos de 4 letras cada uno. Si 
queremos participar en la segunda 
etapa de la fase 3 tendremos que 
poner en el décimo código lo si- 
guiente: BCAA, en la cual "B" 
determina la segunda etapa y "C" la 
tercera fase. Haced pruebas. Acon- 
sejo que en los códigos del uno al 
once se coloque la letra "A". Ejem- 
plo: 

1 AAAA 

2 AAAA 

3 AAAA 

4 AAAA 

5 AAAA 

6 AAAA 

7 AAAA 

8 AAAA 

9 AAAA 

10 AAAA 

11 AAAA 

12 BCAA 

Y si queremos hacer la última 
etapa (Gao-Dakar), el final del ra- 
llye, en el duodécimo código ten- 
dremos que colocar CCAA. 




RAFAEL SALGUERO RUIZ 
(BARCELONA) 



Las claves de acceso de este juego 
son: 

Fase 2. EASY, 3. ANGRY, 4. 
GRATEFUL, 5. DEAD, 6. VISI- 
BLE, 7. HAROLD, 8. SMILING, 
9. WAITING, 10. MINSTREL, 11. 
TIGER, 12. ILLUSIVE, 13. RAM- 
PANT, 14. ROARING, 15. BO- 
RED, 16. FINAL. 




ANTONIO GONZALEZ 
(SALAMANCA) 



SPECIAL 0PERATI0NS 



El mapa del terreno está en uno 
de los lagos, y en otro las llaves del 
complejo subterráneo. Para entrar 
en el recinto has de llevar un médico 
I que cure a los heridos, un falsifica- 
I dor que escriba los pases con vues- 
tros datos, un lingüista y un autor. 
Los pases y los uniformes se consi- 
I guen quitándolos con "TA" a las 
patrullas que encontremos por el 
camino. La clave para entrar en el 
complejo se obtiene interrogando a 
los heridos. Para el complejo hay 
que llevar un arrajero. Es muy útil el 
francotirador. 



TRUCOS DEL PROGRAMADOR 




LISTPARA VISUALIZAR 
LA PRIMERA LINEA 

Para que tecleando LIST sólo se 
visualice la primera línea del programa, 
tecleamos en modo directo -o sea sin 
número de línea-: 
N=PEEK (&HFC48) + 256* 
PEEK(&HFC49) 
POKE N+1,0 
Ejemplo: 
10 REM 

20 PRINT "HOLA" 

30 PLAY "CDEFGAB" 

40 GOTO... 

POKE N+1,0 

LIST 

10 REM 

OK 

Sin embargo el comando RUN se 
ejecuta perfectamente. 

Si el ordenador tiene 32k de RAM o 
más, N será igual a 32768, por lo que 
con POKE 32769, 0 obtendrás los 
mismos resultados. 

Pablo Soler Pía 
(Barcelona) 



Si quieres hacer partícipe a los lectores de tus 
descubrimientos en programación sólo tienes que 
enviar estos a: 

MANHATTAN TRANSFER, S.A. 
Sección: Trucos del programador 
Roca i Batlle, 10-12, bajos 
08023 Barcelona 

especificando en un lugar claro y visible tu nombre 
y dirección. 

RAICES DE CUALQUIER 
INDICE ENTUMSX 



Como todos sabéis el MSX sólo 
tiene un comando para hallar la raíz 
cuadrada de un número, pero aplican- 
do una propiedad de los radicales que n 
V~a = al/n he construido un sistema 
para hallar raíces de cualquier índice. 
Es así: 

PRINT 45^ (1/4) 

Esto dará la raíz cuarta de 45: 
2.590020064111 

Para cambiar la raíz, sustituid el 4 
por el índice que queráis. Se acabaron 
los límites de SQR. 



Angel Manuel Olmos Sáez 
Majadahonda (Madrid) 





AL HACER UN LIST 
NUMEROS DE LINEA 
IDENTICOS 

Con el siguiente truco al teclear 
LIST nos dará el listado completo pero 
con el mismo número de línea para 
cada una. 

D=(PEEK (&HFC48) + 256* PEEK 
(&HFC49) + 1 

FOR Y=0 TO L:I=PEEK (D) - 256* 
PEEK (D+l): POKE D+2, N:D=I: 
NEXT 

Donde L es igual al número de línea 
que tiene el programa -te puede ayudar 
el comando RENUM 1,1,1,-; y N el 
número que se le quiere asignar. 

Así si tecleamos: 
10 PRINT "NO" 
20 PRINT "SI" 
30 GOTO 20 

D=(PEEK (&HFC48) + 256* PEEK 
(&HFC49) + 1 

FOR Y=0 TO 3:I=PEEK (D) + 256* 
PEEK (D+l): POKE D+2,10: D-I: 
NEXT 
LIST 

10 PRINT "NO" 
10 PRINT "SI" 
10 GOTO 10 

Sin embargo no hay problemas a la 
hora de la ejecución del programa 

Pablo Soler Pía 
(Barcelona) 




Mando 
indestructible. 



Un nuevo concepto 
de controlador 
de juegos y gráficos digitales. 

La respuesta inmediata 
y digital a todas las acciones. 

La revolución de los joystick al mejor precio. 



VP 2.360 pts. joystick del año MSX-Club. 



A TRAVES DE MSX-CLUB DE MAILING 



PUEDES ADQUIRIR JOYCARD DIGITAL YANJEN 



ENVIA HOY MISMO ESTE CUPON 



Nombre y apellidos . 
Dirección 



Población CP . 



. Prov. 



Tel. 



Deseo recibir I | Joycar & Digital Yanjen al precio unitario de 2.360 pts., para lo cual remito talón al portador barrado ! 

;. más 240 ptas. en concepto de gastos de envío o giro postal del que adjunto el correspondiente | 





rrns 



» * > corviole-d- 



Marqués de Monteagudo, 22, bajo. 
Tels. 564 36 07/1 3 - 28028 MADRID 
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